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BASIC PARA PRINCIPIANTES. 


CORREO, TRUCOS, ETC 


LO MAS SERIO 
Y PROFESIONAL 
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AMSTRAD-ATARI 520-COMMODORE 
SPECTRAVIDEO-SPECTRUM-QL 


Cursillos de Basic y Servicio Especial Posventa 
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HEROES ANONIMOS 


de sus partes: hardware, firmware, software. 


Estuvimos en Londres en la feria de AMSTRAD. Ofrece- 
mos un reportaje sobre las últimas novedades en perifé- 
zu software. La esperada expansión de 64 K para el 


Conclulmos por fin con la interesante historia del naci- 
miento del AMSTRAD, y de sus creadores en cada una 


EN РОЯТАО 


disco de AMSTRAD....... 


Análisis del operativo CP/M. Cónro podremos utilizar esta 
poderosa herramienta que acompaña a los modelos con 
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FIRMWARE 


De nuevo atacamos a las rutinas incorporadas en la ROM 
de los CPC. En esta ocasión tratamos el SCREEN PACK, 
encargado de gestionar la pantalla grática y de соо 


THE DEVIL'S CROWN 


este caso el escenario е: 
өп la aventura. 


—————_——— ا 


Los juegos no sólo transcurren en el espacio sideral. En 
el fondo del mar! Sumérjase «се carrulng а tank of cxuse 


en su difícil misión. 
LT 


do cotratogia. Compatiblo 464, 664 y 6128. 


Acción, emoción y diversión con este apasionante juego 


(Риода un robat construir un ordenador? Sentado a los 
mandos de su AMSTRAD, БОЛЫ dirigir al pequeño CYLU 
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TECLA A TECLA 
FRONTON 


¿Quién no ha jugado alguna vez en una máquina de bar 
a este juego? También conocido como «Los ladrillos», es 
uno de los pioneros en juegos de pantalla. Hoy está a dis- 
posición de nuestros lectoras..... 


Para lectores con paciencia y ganas de exprimirse el ca- 
rebro, ofrecemos esta versión del conocido juego de 
Othelo. . 


AMGRAPH 


Gráficos de Tarta, gráficos de Barras, gráficos lineales... 
toda una amplia gama de posibilidades, incluida la de ob- 
tenor copias por impresora. 


JERGA INFORMATICA 


¡Las ciencias adelantan que es una barbaridad! Y con la 

| ciencia y la tecnología, aparecen nuevos términos, incom- 
prensibles para el profano. Póngase al día en este nuevo 

lenguaje del futuro. 1167 


RSX: COMANDOS ЕМ TECNICOLOR 


Un grupo de comandos que permiten obtener facilmente 
desde BASIC caracteres multicolores en la pantalla, e 
cluso pequeños Sprites. ..... а 


COMPRESOR 


Si en estos momentos acaba de realizar un precioso di- 
bujo en la pantalla de su AMSTRAD, es el momento de 
leer este artículo. Ahorre tiempo y espacio a la hora de sal- 
var pantallas a cinta/disco. 


AMSTRADIEZ 


Los diez mas «IN» del panorama de juegos. Siga da cer- 
са la reñida lucha por ser el № 1 de nuestras listas di 
éxitos..... anne 


CURSO DE BASIC 


Segunda lección 


¿Qué tal la primera lección, bien? Pues ánimo y a conti- 
nuar. Repase primero lo aprendido el mes anterior y atré- 
vase con nuestra lección de hoy... 


LIBROMATICA 


Tres temas interesantes hoy en esta sección: Hacia la in- 
teligencia artificial con AMSTRAD, Código máquina para 
principiantes con AMSTRAD, y Ordeno y Aprendo con 
AMSTRAD, para Е.С.В. E 
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ran las nueve de la maña- 
na y, frente al hotel, se iba 
formando una cola cada 
vez más larga. Los usua- 
rios de Amstrad aguarda- 
ban impacientes el comienzo, a 
las diez, del segundo Amstrad 
Computer Show, una feria en la 
que podrían contemplar y comprar 
a buen precio los últimos progra- 
mas, periféricos y aparatos Ams- 
trad. El sábado 11 de enero, a la 
diez y cinco, en el salón de expo- 
siciones del Hotel Novotel по са- 
bía un alma. 

La expedición de Amstrad User 
había llegado el día anterior, aun- 
que la niebla en Barajas provocó 
serios problemas. Paradójicamen- 
te, Londres nos recibió con un sol 
y un cielo despejado que parecian 
más propios de España que de las 
Islas Dritánicas. 

La primera feria se celebró el 
pasado octubre, y fue un gran éxi- 
to, ya que apenas había acabado, 
y los oraanizadores ya tenía cu- 
biertos los stands de la segunda 
convocatoria. En efecto, había 
grandes expectativas sobre las 
ventas de Amstrad en la campaña 
navidoña, y muohos fabricantes y 
distribuidores de hard y software 
querían estar presentes con peri- 
féricos y programas en el mes de 
enero, para ser los primeros en lle- 
gar al püblico. 

Маз de 75 expositores, compa- 
ñías de software y fabricantes y 
distribuidores de hardware, se re- 
partían las amplias instalaciones 
del hotel. Entre las principales no- 
vedades, anunciadas poco antes 
en la prensa británica, llamaban 
especialmente la atención la am- 
pliación de memoria anunciada 


por DK'tronics, que permitiría con- 
vertir un 464 o un 664 en un 6128, 
posibilitando el uso del CP/M Plus. 
La estrella de la feria cra una pla- 
ca que permile convertir al CPC 
6128 en un compatible IBM PC, 
con todas las posibilidades que 
ofrece, al poderse ejecutar pro- 
gramas MS-DOS sobre las máqui- 


nas. Discos duros para 6128 y 
8256 completaban las posibilida- 
des de convertir a estas máquinas 
en verdaderos «monstruos», Ile- 
nos de posibilidades en el terreno 
profesional. 

Modems y dispositivos de co- 
municaciones eran otro de los fo- 
cos de atención, y eran pocos los 
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stands donde no se ofrecía una 
contribución en ese terreno. Uno 
de los más ambiciosos era el 
puesto de Northern Computers, 
con una red local orientada al mer- 
cado educativo que ofrecía gran- 
des posibilidades, al poderse co- 
nectar Amstrad, BBC, ІВМ РС, 
MSX y otras máquinas de red lo- 
са, con un servidor de гей equi- 
pado con disco duro de 20 me- 
gabytes. El sistema levantaba ex- 
pectación, pero ésta se enfriaba 
un poco al ver los precios del 
sistema 

Los amantes de los gráficos y 
del diseño asistido por ordenador 
también estaban de enhorabuena, 
ya que tanto los disenadores de 
software como los de hardware les 
dedicaban atención, con varios 
programas como The Animator, 
para presentar figuras en movi- 
miento, o el Draughtsman, un ex- 
celente programa de САП/САМ a 
la medida del usuario. Una tableta 
digitalizadora muy barata (unas 
15.000 pesetas) teniendo en cuen- 
ta los precios habituales de estos 
Gispositivos. 


Una característica curiosa de la 
feria fue la presencia dominante 
de aplicaciones y material orienta- 
do directamente a aplicaciones 
«serias» (profesionales y educati- 
vas). Los Amstrad (especialmente 
el 8256, uno de los protagonistas 
de la feria) son máquinas que van 
a un público cada vez más ргоіо- 
sional, aunque los programas de 
juegos estaban presentes en mu- 


chos de los stands de distribuido- 
res de software, con una calidad 
excelente. 

El PCW 8256 se compraba por 
docenas, sobro todo en uno de los 
expositores, que ofrecía la máqui- 
па con la segunda unidad (de 
720K) a un precio poco mayor al 
del ordenador con un disco, El 
hermano mayor de la familia Ams- 
trad había atraído la atención de 
muchas compañías, que transfe- 
rían o escribían programas CP/M 
para usuarios profesionales 

Nuestra expedición recorrió arri- 
ba y abajo la feria, encontrando 
serias dificultades para abrirse 
paso entre la gente, y recogió ki- 
los de catálogos y lolografías. 
También aprovechamos la oca- 
sión para saludar a los editores de 
revistas para amstradictos ingle- 
ses y franceses; por cierto, estos 
ültimos nos anunciaron su feria de 
novedades que se celebrará en 
París a partir del 22 de febrero, y 
donde se podrá seguir viendo qué 
productos de interós aparecen 
para complementar las prestacio- 
nes del ordenador. 


En el stand de Cumana pudimos 
ver la tarjeta ASTRON, una nove- 
dad muy interesante. Se trata de 
un interfaz que permite conectar 
tarjetas ROM, EPROM, EEROM y 
RAM permanente. Nos explica- 
тов: mediante ellas, cualquier 
compañía de software puede co- 
mercializar, en grandes cantida- 
des, programas de cualquier tipo, 
con el añadido de que, зі se fabri- 
can en grandes cantidades, su 
precio los hará poco atractivos de 
copiar 

Las restantes siglas significan 
que existen otras posibilidades de 
uso, como por ejemplo almacenar 
las fichas personales de un médi- 
co. En una EEROM la información 
es permanente, aunque se puede 
reprogramar. La versión de RAM 
con pilas admite hasta cinco años 
de memoria que se puede usar 
como un disco, pero mucho más 
rápida. Las capacidades oscilan 
entre 16 y 128K bytes 


UT Ut 


Los piratas, o se compran un 
dupicador de EPROM, o lo van a 
pasar realmente mal. (Incluso así, 
la copia no es tan fácil como pue- 
de parecer.) 


VORTEX: 
UN VERDADERO 


REMOLINO VENIDO DE ALEMANIA 


De Alemania Occidental viene Vor- 
tex, y gama de periléricos para 
Schneider (nombre por el que se со- 
noce allí al Amstrad) va a revoli nar 
ol mercado profesional. Su primer pro- 
ducto anunciado, un disco duro de 
20Mbytes, lo pudimos ver en la feria a 
un precio aproximado de 70.000 pe- 
selas Una interesante novedad para 
los usuarios profesionales, que pue- 
den ahora obtener hasta 20 millones 


de caracteres de almaconamionto a 
velocidades más que interesantes. 

Una ampliación de memoria de has- 
ta 512K, con una complicada lógica 
de paginación, permite utilizar progra- 
таз compuostes de varios bloques de 
hasta 32K cada uno, compartiendo 
variables y pudiendo saltar de un ban- 
со a otro mediante comandos inclui- 
dos en НОМ El resto de la RAM dis- 
ponible se puede usar сото bulfer de 
impresora o disco virtual, o bien para 
almacenar pantallas. 

Esta misma compañía anunció una 
tarjeta MS-DOS que debía haber sido 
la estrella de la teria, Sin embargo, 
puestos en contacto con Vortex, nos 
antinciaron que no estaba disponible 
por problemas de compatibilidad con 
su expansión de memoria. Nos anun- 
сагоп asimismo que el producto esta- 
rá en funcionamiento en breve 


TABLETA DIGITALIZADORA 


A UN PRECIO ASEQUIBLE 


La tableta oigitalizadora Grafpad II, 
que permite el dibujo a mano y la in- 
troducción de datos, es la primera que 
cae (en Gran Bretaña) por debajo del 
límite de las 15.000 pesetas. Algunos 
lectores se extrañarán, pero hace un 
año era imposible encontrar una table- 
ta digitalizadora por menos de 50.000 
pesetas. 

Con 


una resolución de 
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1280 x 1.024 puntos, una velocidad 
muy interesante y un interíaz paralelo 
adaptado a BBC. Commodore y Ams- 
Тай, se trata de un Instrumento útil 
para dibujantes, diseñadores y gente 
interesada en САО/САМ. El programa 
de dibujo qua se incluye permite (y lo 
vimos hacer al público) dibujar con 
casi lanta facilidad como con lapiz у 
papal 


HISOFT 


MUCHOS (BUENOS) 
PROGRAMAS 


El catálogo de Hisoft no incluye 
sólo sus productos, que ya gozan de 
ипа muy buena reputación como los 
mejores ensambladores y compila- 
dores de varios lenguajes para 
Spectrum y otras máquinas, sino que 
ha adquiridos los derechos de distri- 
bución de varias otras compañías 
que trabajan programas CP/M. El cê- 
lálogo incluye el DEVPACBO, ver- 
sión CP/M del más famoso conjunto 
de ensamblador y desemsamblador 
que haya existido en máquinas 280. 
Sus últimos desarrollos incluyen la 
posibilidad. en el caso del monitor 
МОМВО, de interrumpir la ejecución 
en el momento que se desee, de 
buscar mnemónicos de ensambla- 

, de desemblar a disco... El 
puede 
ser un macroensamblador que per- 
mite llamar macros recursivamente e 
incluir ficheros de disco. 

El nuevo catálogo permite elegir 
también el ensamblador M80 de Mi- 
crosott, el compilador C de Hisoft o 
el de BDS o AZTEC. Los compilado- 
res e intérpretes de BASIC CBASIC, 
MALLARD y NEVADA hacen facil 
elegir También el FORTRAN y el 
COBOL NEVADA completan la lista 
de lenguajes, donde también Micro- 
soft interviene con su MS-FORTRAN 
y su MS-COBOL, PRO-FORTRAN, 
Hisoft Pascal, Turbo Pascal y Pro 
Pascal hacen una lista de lenguajes 
donde resulta francamente difícil ele- 
си. Forth, Modula 2. Micro-Prolog y 
PILOT.. 

Hará falta todo un artículo, que 
pensamos publicar on brove, para 
analizar las alternativas de todos es- 
los lenguajes. Mientras tanto, habrá 
que fiarse de la accesibilidad de los 
paquetes de software y de la com- 
patibilidad con desarrollos anterio- 
res. 


Una pila de expansiones es lo que 
ha preparado los chicos de dk tronics 
Una expansión de memoria de 64K y 
otra de 256 permiten la conversión de 
un 464 o de un 664 (al menos eso nos 
dijero) en una máquina tan potente 
como un CPC 6128, o incluso con más 
memoria, que puede usar el CP/M 
Plus (5 se dispone de una licencia de 
uso). 

Los posibles usos de la memoria ex- 
tra, aparte de la mejora da poder usar 
СРМ Plus, con un área de programas 
de usuario de 61K, vienén dadas por 
software de conmutación de bancos 
análogos al bankman del 6128. para 
usar como medio de lamacenamiento 
temporal. Los precios en Londres os- 
cilaban entre las 12.000 de la expan- 
sión de 64К y las 24.000 de la de 
256K. 

Para los usuarios que tengan más 
problemas con el almacenamiento en 
disco, se ofrece un «disco de silicio» 


de 256K, con software que le permite 
emular inmediatamente la unidad B (la 
C en sistemas con dos discos), para 
ganar tiempo en las operaciones de 
disco. El precio es el mismo que el de 
la ampliación de 256K 

Otras novedades de interés que 
amplian la оепа de periféricos ya 
existentes son al lápiz óptico y el sin- 
letizador de voz, este último con un 
amplificador estéreo 


MODDEM Y CONEXIONES CON SISTEMAS 


DE TELETEXT 


Entre los modem que se olrecian, 
llamaba la atención el equipo de Cir- 
kit, lormado por un Interface especifi- 


co para los Amstrad y el ecoplador 
acústico de Protek. Orientado a la со- 
municación con servicios de videotex- 
to, su principal ventaja es el precio, de 
alrededor de 7.000 pesetas. Su incon-* 
veniente, que solo воропа tasas de 
comunicación de 1200/74 y 
1200/1200 half duplex 

Los programas incluidos servian 
para la comunicación y transferencia 
de ticheros entre usuarios y con Ios 
boletines electrónicos. 

El modem Nightingale, comerciali- 
zado por PACE, ofrecía unas presta- 


NOVEDADES DE 
DIGITAL RESEARCH 


Dignal Research no sólo inventó y 
comercializó el CP/M, sino que dispo 
ne de un gran catálogo de productos 
para ese operativo. Entre ellos pode- 
mos reseñar la aparición de su CBA- 
SIC y del Pascal MT+, Estos dos pro- 
gramas, compilador de BASIC y Pas- 
cal, ayudan a establecer la gama 
Amstrad como una de las mejores do- 
tadas de herramientas de desarrollo 
de programas. 

Por otra parte, DR Graph es uno de 
los programas de gráficas para el pro- 
fesional más interesantes de la gama 
CP/M, y DR Draw un programa de di- 
bujo de altas prestaciones 

Los cuatro programas forman parte 
de la gama profesional de Digital Re- 
search. y se presentan con una pre- 
sentación impecable y a un precio 
asequible en Gran Bretaña. 


r 


ciones mucho mayores, pero a un pre- 
cio de 25.000 pesetas. se trata Че un 
modem multiestándar (300/300, 
1200/75 y 1200/1200), con modos ori- 
genes y respuesta, que se acopla 
electrónicamente al teléfono y vía un 
interface RS232 proporciona al Ams- 
trad amplias posibilidades de comuni- 
cación. El software incluido cubre un 
gran número de posibilidades. 


avanvnLov 


` DIGACOMP S.A. 


DISTRIBUIDORA GALLEGA DE COMPUTADORAS, S.A. 
Calle Hospital, 8 Ferrol, Tel.: (981) 35 32 43 


DELEGACION DE INDESCOMP 


PARA EL SERVICIO DE AMSTRAD y SPECTRAVIDEO 


EN GALICIA 
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Bien, hasta ahora 
hemos contado la 
historia anterior a la 
presentación del 
СРС464. Con esta 
última entrega les 
relataremos los 
sucedido desde 
entonces hasta la 
fecha. 


espués de la excitación 
que produjo el lanza- 
miento del 464 en abril 
de 1984, el equipo de 
desarrollo se concentró 
en terminar el sistema 
de disco —que apareció 
puntualmente cn las 
tiendas en octubre de 
ese mismo año—. Al 
tiempo que se desarro- 
llaba el trabajo en torno a 464, la in- 
dustria parecia apasionada con los 
cassettes —aunque el jefe se dio 
cuenta rápidamente de que los dis- 
cos iban a ser elementos punteros, 
al comparar los diez segundos que 
llevó cargar desde disco el progra- 
ma «La Pulga», comparado con 
los seis minutos que tardaba en 
cassette—. 

mecanismo que ofrecía alguna espe- 
ranza de que Amstrad consiguiera 
un precio mágico de 199 libras fue 
una oferta de Panasonic. La saga de 
los discos de tres pulgadas había 
comenzado. 

El hecho de que las unidades de 
tres pulgadas ofrecian mucha más 
seguridad que las configuraciones 
más económicas de 5 pulgadas fue 
también un factor importante en la 
toma de decisión. En ese tiempo, los 
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discos de 3 1/2 pulgadas no ostaban 
del tado reconocidos, y esa fragilidad 
en cuanto a posición de mercado fue 
un motivo de preocupación. 


Pero no es estándar 


Pero el precio no fue el único pro- 
blema. Para un sistema de disco 
completo con sistema operativo y 
con compatibilidad total con el siste- 
ma de cassette, un precio de 199 li- 
bras era un auténtico bombazo. Se 
emplearon muchas horas reflexio- 
nando sobre la oportunidad de intro- 
ducir discos de tres pulgadas en un 
mercado dominado por las unidades 
дей, 5 1/4 y 3 1/2, y había tantos tar- 
matos diferentes dentro de este es- 
pectro que el uso de la palabra «es- 
tándar» carecía de sentido. 

Sin embargo, los discos de tres 
pulgadas tenían la ventaja de que 
eran eléctricamente idénticos al es- 
tándar de 5 1/4, aunque eso era lo 
más que podía decirse en ese mo- 
mento para inquietar al mercado de 
tes pulgadas y media. 

Algunos observadores influyentes 
dieron muestras de un alto grado de 
ignorancia comparando solamente 
capacidades. Manifestaban enton- 
ces que los discos de tres pulgadas 
tenían una capacidad de 250 K, 
mientras que los de tres y media 
ofrecían hasta 1 Mbyte. Bien, lecto- 
res, esa era la situación de todas las 
alternativas, pero los precios se ha- 
bían situado fuera de los términos de 
referencia de Amstrad para un pro- 
ductos de masas. Con el PCW8256 
y la orosión de costes quo со produ- 
jo, todo esto salta a la luz, aunque 
no hay evidencia de que el profeta 
de las tres pulgadas y media se ha- 
ya comido sus palabras. 


¿Quién es el 
estándar ahora? 


Amstrad ha vendido probablemer- 
te más sistemas CP/M-80 que cual- 


quier otro fabricante de micros, y por 
eso debe ser considerado como un 
estándar. Dando otros pocos meses 
de ventas a los enormemente exito- 
sos РСМ/8256, CPC6128 y a la ex- 
pansión DD1 no habrá más argu- 
mentos en contra. 

Teniendo en cuenta la reacción 
hacia un micro doméstico con un sis- 
tema de disco de bajo costo, era ob- 
vio que lo que habia que hacer era 
incluir el disco dentro del ordenador, 
y extender el principio básico de 
Amstrad de reducir costes poniéndo- 
lo todo en un solo módulo. 

Era, supuestamente, una tarea 
para llevar a cabo con el mínimo de 
interrupciones, ya que el РСУ/8256 
se había concebido en ese tiempo, y 
ara el foco de mayor atención. Sin 
embargo, Locomotive vio la oportu- 
nidad de adaptar el Basic al sistema 
de disco y de anadir al mismo tiem- 
po algunas características extras 
que no se incluyeron en la versión 
1.0 por falta de tiempo. 

El 6128 fue considerado, desde el 
principio, como un imposible, pero 
MEJ encontró eventualmente una 
manera de solucionar los problemas 
que se plantearon al intentar añadir 
64 K de RAM —Locomotive encon- 
tró la manera de hacer uso de ello— 
y el proyecto se completó más rápi- 
damente de lo que nadie había es- 
perado. El precio de las partes se 
vino abajo rápidamente como resul- 
tado del agitamiento que se produjo 
a principios del 85 con el sorpren- 
dente precio del 6128 (299 libras). 


Software 


Mientras tanto, el software етре- 
zó a ser abundante. La tarea original 
de convencer a las casas de soft 
para que probaran nuestros progra- 
mas se hizo más fácil durante ese 
tiempo, y algunas marcas con re- 
nombre comenzaron a aparecer. 
«Roland in Time» fue el primer me- 
ga-juego, perseguido muy de cerca 
por la conversión de «Jet Set Willy» 


(¿No os parece todo como de una 
generación anterior?). 

La abundante documentación dal 
sistema operativo fue un acicate 
para muchos programadores. El 
Pascal de HiSoft estuvo disponible 
rápidamente para demostrar lo que 
so podía hacer con la máquina y un 
sistema operativo cuando caía en 
manos de un programador serio. 

La compañia Tasman evaluó rápi- 
damente el potencial del sistema y 
produjo, en la forma de Amsword, la 
mejor implementación de su paque- 
te TasWord Spectrum WP, animan- 
do a algunos especialistas a tratarlo 
con grandes elogios y también con 
algo de entusiasmo. De hecho, el 
éxito del AmsWord subrayó la rele- 
vancia de un procesador de textos 
para este tipo de domésticos y tuvo 
bastante influencia en la dirección de 
nuevos productos. 


originalmente no aceptaron la oferta 
de Amstrad empezaron a interesar- 
se al tiempo que leían los informes 
de ventas, de exportación y situación 
general de la empresa. Con BBC y 
Sinclair, cuyos mercados mostraban 
el comienzo de los problemas que si- 
guieron durante 1085, un buen nú 
mero de casas de software estaban 
ahora tratando de mantener íntegra 
su posición en el mercado. 

Cada vez iba apareciendo más y 
mejor software, y a mediados del 85 
todos los grandes estaban produ- 
ciendo nuevos títulos simultánea- 
mente en el formato del 464. 


Te lo dije... 


Dando muestras de una hospitali- 
dad fuera de lo comün, Amsoft or- 


Las compañías de software que | ganizó una conferencia para escrito- 


res de software en diciembre del 84 
para estimular y para proporcionar 
información general, insinuando que 
el esfuerzo que se hiciera en el de- 
sarrollo software para CP/M по que- 
daría sin recompensa 

A pesar de eso, la introducción del 
6128 y del 8256 parecía haber cogi- 
do a la mayoría de la gente en el lim- 
bo, y el innovador software de CP/M 
con el soporte gráfico de GSX pro- 
viene ahora de uno o dos sitios so- 
lamente —sobre todo de lan Seagle 
de Software Technology—. 

Parece incuestionable la fe que la 
gente de Amstrad tiene para con su 
producto. La ruptura y debacle gene- 
ral del mercado de micros domésti- 
сов provoca, en aquellos que no е: 
tán próximos al producto, suspica- 
cias y una actitud cauta si se preten- 
de involucrarlos activamente. Quizás 
el dinamismo de Amstrad en merca- 
dos volátilos hace que la gente зе 
muestre cautelosa de que Amstrad 
pudiera desaparecer cuando las co- 
sas fueran mal, pero lo que ellos no 
aprecian correctamente es que la ca- 
lidad de la oposición en el mercado 
de ordenadores no era tan alta como 
en el mercado electrónico, que for- 
ma la columna de la experiencia de 
Amstrad. 


Para Amstrad, competir fue como 
pescar en un barril. La competencia 
ayudó generosamente al esfuerzo 
general de la compañía con sus con- 
finuos tropiezos, que se traducían en 
precios erróneos, tácticas de creci- 
miento lento y una falta general de 
perspicacia en los negocios que fue 
el resultado de dos años previos de 
adulación por parte de los medios de 
difusión. 

Contrariamente a la creencia po- 
pular, ni una institución ni el amparo 
de la BBC fueron garantía de inven- 
cibilidad una vez que el muchacho 
de Hackney olfateó el triunfo. Este 
hecho produjo algo de confusión y 
sorpresa en el mercado de valores, 
lo cual vino a demostrar que todas 
las compañías fabricantes no esta- 
ban en Un buen momento, No eran 
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HEROES ANONIMOS y (IV) 


tiempos de ofrecer grandes dividen- 
dos, así que Amstrad estableció los 
suyos alrededor de los 85 peniques 
hasta hace muy poco. 

Sin embargo, todo ello significa 
que Amstrad parece capaz de pro- 
ducir nuevos ordenadores antes de 
que lan Sinclair pudiera escribir so- 
bre ellos, y eso quiere decir algo. 


De nuevo en el 
hardware 


El 6128 fue, preferentemente, una 
labor de fondo, mientras que los ma- 
yores esfuerzos se están empleando 
en el PCW8256. Este comenzó con 
la pantalla al final, pero por razones 
de diseño y tecnología, se eligió una 
postura más convencional. А pesar 
de todo, el principio básico de meter 
todo lo posible en el módulo de la 
pantalla se mantuvo, y las grandes 
ventajas de su formato de 90 por 32 
aún provocan las quejas de los co- 
mercializadores de PCs, ya que el 
público acepta gozosamente la ofer- 
ta de Amstrad en su justo valor y uti- 
lidad, en lugar de los compatibles 


ІВМ, que son costosos y poco poten- - 


tes, y tienen pantallas con una сара- 
cidad de un 40 % menor. 

El colapso de precios de los со! 
ponentes provocó la adopció 
técnicas «todo RAM», y aul e 
había considerado como | 
otras opciones en caso de que: 
de 256 K no bajara de р 
ma ostensible, no fueron ni 
En consecuencia, los 11 
со RAM es una de las са 
más útiles del sistema, | 
mite que los programas en 
simplemente «estén» y п 
tiempo en procesos de ‹ 
cionales. 

MEJ Electronics empleó la 
parte de su tiempo desarrolla: 


las | 
matrices de puertas lógicas y, una 

vez más, en realizar un planning de - 
trabajo, En vista de la manera en que - 


se desarrollaba el software para con- 
trolar el hardware, era esencial para 
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Locomotive tener una ejemplo ргас- 
tico tan pronto como fuera posible, 
de forma que se desarrolló un com- 
plejo sistema de simulación, más 
aún quo el del 464, ya que esta vez 
había que utilizar menos circuitos in- 
tegrados, y no había componentes 
como el controlador de pantalla 
6845. LocoScript pasó varios cientos 
de fases de desarrollo. Como se tra- 
taba de un producto complejo y to- 
talmente integrado, cualquier altera- 
ción, por pequeña que fuera, reque- 
ría una recopilación completa del có- 


е/м 


digo fuente. Pero con su usual aten- 
ción a los detalles y a la calidad, la 
versión 1.0 se hizo realidad y demos- 
tró ser mucho más sofisticada y ca- 
paz de lo que nadie hubiera espera- 
do, dado el plazo de tiempo relativa- 
mente corto de que se dispuso. 

Y en caso de que usted se lo pre- 
gunte, LocoScript no fue el primer 
nombre elegido, ya que зе desecha 
ron muchos otros igualmente buenos 
y descriptivos. Piense usted que 
WordStar tampoco fue muy original, 
¿no es cierto? 


La movida la anunciamos en nuestro 
número de enero: Mastertronic sacaba 
programas para Amstrad a un precio іпі- 
gualable. El resultado en las listas de éxi- 
tos británicos fue espectacular, con cin- 
со programas entre los diez primeros en 
le lista para Amstrad. 

Ahora, muy poco después, aparece la 
noticia de que, en la prensa británica, la 
hermandad de compañías de software pi- 
den que se excluyan los productos «de 
rebajas» de las listas o, al menos, que se 
hagan dos listas separadas, una para los 
productos «de precio completo» y otra 
para las srebajas». Mastertronics, natu- 
ralmente, ha protestado y la solución no. 
se ha tomado todavía. La hermandad de 
fabricantes dice que, aunque los más 
vendidos se indican por la cantidad, eso 
no da a los usuarios una idea de la cali- 
dad final del juego, o incluso del volumen 
del negocio, ya el precio es mucho me- 
пог. 

El portavoz de Mastertronics dijo que 
no creía que tuviera sentido vender jue- 
gos a 2.500 pesetas los usuarios de má- 
quinas que valen menos de 60.000. «Los 
precios de los juegos tienen que caer, ya 
que los precios de las máquinas caen. 
Las demás casas de software van a per- 
der la batalla. Antes de incluir los juegos 
de Mastertronic en la lista, nadie creía 
que pudiéramos tener éxito, pero este 
año hemos vendido més de dos millones 
de juegos». 

Por otro lado, Gallup, que es la aso- 
ciación que se encarga de elaborar las lis- 
tas, escucha a ambos contendientes, y 
espera tomar en breve una decisión. No- 
sotros esperamos que España sea en bre- 
ve objeto de batallas parecidas, que pon- 
gan los precios de los programas a un ni- 
vel que acabe con los piratas por astixia 


económica. 


Se trata de una máquina educativa, par- 


te de la línea de productos Fischertechnik 
Gomputing. Esta empresa, especializada en 
cajas de construcción, pero con una gran 
experiencia en el campo industrial, decidió 
entrar en el campo de la informática per- 
sonal ofreciendo Kits de montaje para usua- 
fios que quieran construir sus propios 
periféricos. 

El Kit incluye tres elementos: en primer 
lugar el interfaz, que permite su conexión 
a Amstrad 464, 664 б 6128, Commodore 
0 Apple, de manera que el ordenador pue- 


Excepto Amstrad, los fabricantes de microordenadores siguen empan- 
1апайоз en una grave crisis: Commodore cierra la planta británica, úni- 
са donde se fabricaba el Commodore 16, para concentrar sus esfuerzos 
sobre el resto de las factorías. Y, por otro lado, Sir Clive Sinclair ha 


acabado el año en números rojos. 


Los malos resultados en el mercado, junto a la bajada de la valora- 


ción de stoci 
спе сі 


millones 4 


sobre todo de 01), han hecho que Sinclai pa 


¡se de unos 


l 
presa, que le han permitido sobrevivir cuando muchos auguraban lo 


peor. 


tradictos con disco. 


COO a 


0п disco de tres pulgadas y media y CP/M. Más usuarios CP/M, 
redundará en programas mejores y más baratos para los ams- 


REALM OF 
IMPASSIBILITY 
e — 


Uno de los fundadores de Electronic 
Arts, una empresa de los EE.UU. que ha 
comercializado algunas de los mejores jue- 
gos de Commodore y tiene un plan de lan- 


zamientos importante para Amstrad (ya he- 
mos hablado de su distribución en España 
por ОАО soft), está por Gran Bretaña bus- 
cando juegos interesantes para el mercado 
norteamericano, 

Según sus propias declaraciones, llevan 
ya suficiente tiempo vendiendo juegos 
made in USA en este lado del Atlántico, y 
ya es hora de que los buenos escritores eu- 
ropeos tengan oportunidad de acceder al 
mercado norteamericano. A más de un au- 
tor español le brillarán los ojos ante las po- 
sibllidades que le abriría una entrevista con 
Tim Mott, que así se llama el «cazador de 
talentos», 


da controlar el robot de una forma efecti- 
va. El equipo de construcción propiamente 
dicho sirve para construir hasta diez mon- 
tajes, sin contar con la imaginación del 
usuario. Un rotor de antena, un semáforo, 
elevador бе cargas, un plofter y un siste- 
ma de introducción gráfica son sólo una 
parte de sus posibilidades, con un panel 
solar, un sistema de ordenaciónde piezas 
por tamaño y un robot aprendiz como rea- 
lizaciones máximas. 

El sistema se complementa con el soft- 
ware que permite su manejo desde el or- 


denador, que, en el caso de Amstrad, es 
accesible en cassette o diskette. 

La distribución сп España es de Master 
Computer, y el precio está a la altura de las 
prestaciones: alrededor de 35.000 pesetas. 
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La empresa МНТ Ingenieros, conoci- 
da por los periféricos realizados para 
Spectrum y Amstrad, ha sacado recien- 
temente un interfaz RS232 para Amstrad, 
que permite explotar al máximo la po- 
tencia de este interfaz de comunicacio- 
nes. La unidad se acopla fácilmente al 
Bus de expansión de los CPC, y se pue- 
de controlar ampliamente a traves de 
comandos RSX en ROM. Admite veloci- 
dades diferentes en recepción y trans- 
misión, por lo que resulta muy аргора- 
do para el uso como conector para un 
modem de comunicaciones. 

Otros proyectos, alguno en muy avan- 
zado estado de desarrollo, son una am- 
pliación de memoria de 64K, de uso ge- 
пега! como segundo banco de memoria 
para 464, 664 y 6128, que se podrá usar 
también como memoria intermedia de 
impresora, ahorrando tiempo en la im- 
presión de listados largos. Un sintetiza- 
dor de voz con sofware orientado al 
idiorna castellano ahorrará los malabaris- 
mo» que dobon realizar ahora loc usua- 
rios de este producto, con programas ce 
comunicaciones pensados para el idio- 
ma inglés 

А más largo plazo, sus proyectos in- 
cluven el desarrollo de productos que 
permitan la comunicación entre ordena- 


MADE IN APAIN 


dores, así como una ampliación de me- 
moria de hasta 256K, que podrá utilizar- 
se en mültiples aplicaciones aunque to- 
davía no se sabe si servirá para que los 
usuarios de 604 y 404 con disco puc- 
dan ejecutar СРМ Plus. 


Por segunda vez, Indescomp realiza 
una convención para presentar a distri- 
buidores, proveedores, prensa y püblico 
en general sus resultados del ano 1985, 
así como para lanzar su nueva estrate- 
gia de ventas para 1986. Una reunión 
que se celebrará apenas haya salido de 
imprenta este número, el día 7 de febre- 
то, y de la que esperamos dar informa- 
ción en nuestro número siguiente. 

Los resultados del años muestran un 
desbordamiento total de las previsiones 
de ventas realizadas en octubre, hace 


menos de cuatro meses, cuando se pre- 
sentó el nuevo 8256. 


умей 


— CONTABILIDAD СРС 664 у СРС 6128 
— CONTABILIDAD CPW 8256... 


NA 


РТ 


ТЕ OFRECEMOS EL NUEVO PLAN 
GENERAL CONTABLE CON І.М.А. 


13,900 pts 
37.500 pts 


DISPONEMOS DE UN EQUIPO DE SOFTWARE A TU SERVICIO 


HACEMOS PROGRAMAS A MEDIDA 


RECUERDA, DAMOS SOLUCION A LA PEQUEÑA Y MEDIANA EMPRESA 


TORRES QUEVEDO. 34 e TEL. 967/227944 e 02003 ALBACETE 


СР/М 


РАНА CONTROLAR 
TOTALMENTE LA MAQUINA 


El Sistema Operativo es el 
alma que le da vida a la fría 
máquina. Y, aunque esta fra- 
se resulte sabida por todo el 
mundo, se olvida con fre- 
cuencia, cuando nos referi- 
mos al BASIC y al Sistema 
Operativo, que ambos no son 
más que dos programas. 


| CP/M, sistema operativo 
que presentan los Amstrad, 
әс un programa muy овро- 
cial, ya que se encarga de 
la difícil tarea de coordinar 
todas las tareas del orde- 
nador, 
El usuario se sienta ante 
su máquina, introduce el 
disco con el operativo, aguarda un mo- 
mento y ¡hop!. aparece un mensaje de 
conexión. Suele incluir el nombre y 
versión del CP/M (2,2 o Plus), y el fa- 
bricante o distribuidor (en este caso 
Amstrad). A continuación aparece el 
número de discos disponibles, si hay o 
по puerto serie, elc., y la memoria li- 
bre. А continuación la máquina nos іп- 
dica con el famoso A> que espera que 
introduzcamos alguna orden. 

Este famoso mensaje se suele lla- 
mar prompt, e indica que la máquina 
espera una orden. La máquina ejecuta 
en ese momento un programa llamado 
CCP (Console Command Processor) o 
Intérprete de Comandos del teclado. 
Su trabajo es sencillo, aunque aburri- 
do: se trata de leer una línea del tecla- 
do, ejecutar sus instrucciones y volver 
a leer otra. El CCP, o intérprete de co- 
mandos, forma parte de la estructura 
de casi todos los sistemas operativos 
en que la relación directa con el usua- 
rio sea fundamental. Las otras dos par- 
tes del CP/M son el BDOS y el BIOS. 


Un programa para 
facilitar las cosas 


Un sistema operativo no es más que 
un programa que resido en la memo- 
па temporal de un ordenador desde 
que lo activamos hasta que hacemos 
RESET. Su principal característica es 
que proporciona al programador un 
método estándar de acceder a los pe- 
riféricos. Así, nuestros programas 
CPIM pueden pedirle al operativo que 
escriba una línea en la pantalla, sin te- 
ner que preocuparse de la organiza- 
ción concreta de la pantalla en la má- 
quina donde corren, Los sistemas оре“ 
rativos gastan la mayor parte de su es- 
pacio en proporcionar un método efi- 
ciente de gestión de los archivos en 
disco, y por eso se llaman muchas ve- 
ces DOS (Disk Operating System). 

La segunda misión importante de un 
sistema operativo es asegurarle al 
usuario la posibilidad de introducir los. 
comandos minimos para cargar un 
programa desde el teclado, averiguar 
el contenido de un disco o realizar la 
estadística de uso del sistema. En mu- 
chos miniordenadores esta tarea se 
suele realizar por una parte del BASIC 
en ROM, pero no tiene una gran rela- 
ción con éste. La parte del operativo 
que la realiza se llama CCP. 

El BDOS (Basic Disk Operating 
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FUNCIONES DEL CP/M 2 
Parámetros 
Reglstro Entrada Sallda 
° RESET Ning. Ning. 
1 Lect. Teclado 
(CON) Ning. Car ASCII en A 
2 Esc. Teclado 
(CON) ASCII en E Ning. 
з Lect. Aux. (ПОП) Ning. ASCII on А 
4 Esc. Aux. (PUN) ASCII en E Ning. 
5 Esc. Impr. (LST) ASCII en E Ning. 
6(1) ES teclado ASCII en E Ning. 
SI E=FF leer ASCII en E 
а Esc. Cadena direc. en DE. 
Cadena acaba en $ Ning. 
10(1) Leer línea Direc. en DE 
(DE)=long. Buffer lleno 
1 Estado СОМ Ning. A=1 caracter 
А=0 No hay tecla 
pulsada 
15 (1) Abrir fichero Direc. de FCB en DE 0080H+32*núm, ап 
direct. 
FFH si no existe fich. 
16 Certar fich. FCB en DE como 15 
20(2) Leer registro FCB en DE 8-0 correcto 
а-1 EDF. Otros 
errores 
21 (2) Esc. registro FCB en DE 8—0 correcto 
otros valores errores 
22(2) Crear fich. FCB en DE como en 15 
23(1) Camb. nombre FCB en DE como en 15 
(1) Añadidas o cambiadas en 20 y siguientes. 
(2) Añadidas o cambladas өп 3,1. 
System) y el BIOS (Basic Input Output miten la comunicación con el sistema. 
System) sı ments el corazón del La localidad 0000 incluye el punto de 
Sistema. о, y la clave del éxito entrada de RESET, y, en CP/M 22 y 
de CP/M estándar. La expli- anteriores, vuelva a cargar el CCP y 


cación de su cometido resulta más fá- 
cil si utilizamos un mapa de memoria 
de nuestro sistema Operativo (figu- 
ra 1), El mapa en el CP/M Plus es li- 
geramente distinto, уа que éste mane- 
ja más de 64K. Pero la idea es la 
misma. 

Podemos observar que la parte baja 
de memoria (desde 0000Н hasta la lo- 
calidad 256 0100H) incluye una serie 
de variables y parámetros que nos per- 


reinicializa bs discos. Es elsallo que 
зе ejecuta cuando pulsamos | C.En el 
Plus los discos no se inicializan de 


nuevo. 

El punto de entrada para todas las 
funciones del operativo es la localidad 
5, donde por regla general se encuen- 
tra un salto hacia el BDOS. El BDOS 
es la parte estándar del sistema ope- 
rativo, y el BIOS es la parte que de- 
pende de la máquina, y que se debe 


escribir una vez para cada ordenador. 
Aunque el BIOS depende de la máqui- 
na, Digital Research proporciona un 
BIOS estándar, junto con instrucciones 
para su modificación «a la medida». Y 
esta no es una de las menores razo- 
nes de su éxito. 

El BDOS, como parte estándar del 
sistema, permite a los programadores 
utilizar una gran cantidad de puntos de 
entrada para acceder al sistema. Para 
los expertos en ensamblador indicare- 
mos que, para conseguir acceso a las 
funciones del CP/M hay que llamar a 
la localidad 205 con el número de fun- 
ción a utilizar en el registro C y pará- 
metros opcionales en los registros A y 
DE. Los parámetros dependen de la 
llamada, y la tabla 2 muestra algunos 
de ellos. 


La estructura del disco 


Para poder controlar todos los pará- 
metros del disco del sistema, el opera- 
tivo tiene que especificar las caracte- 
rísticas que dobe reunir el directorio. 
En el CP/M se considera que los sec- 
tores tienen 128 bytes, aunque el sis- 
lema puede usar discos con sectores 
de 512 (los más corrientes) y hacer 
luego la conversión. Cada fichero ocu- 
ра un mínimo de una entrada de direc- 
torio, que ocupa 32 bytes. Los discos 
tienen unas pocas pistas reservadas 
para el directorio y, si son discos «de 
sistema», para las rutinas de carga del 
operalivo, Si, por ejemplo, el directorio 
permite 64 archivos, ocupará los pri- 
meros 16 sectores tras los «del sis- 
tema». 

Cada vez que se opera sobre un fi- 
chero o sobre su entrada de directorio, 
ésta se almacena temporalmente en 
тетопа, actualizándose en disco al 
acabar el proceso. Por eso es impor- 
tante que se cierren todos los ficheros 
antes de cambiar los discos. 

Los nombres de archivo deben cum- 
plir ciertas condiciones: el nombre pue- 


Ampliamos 1a red de distribuidores 


AMSTRAD Y SPECTRAVIDEO 


Solicite información a la 
Delegación Indescomp Canarias 
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UN NUEVO CONCEPTO PARA 
INFORMATIZAR LA ENSENANZA 


de incluir hasta ocho caracteres, que 
serán convertidos a mayúsculas, y una 
extensión, separada por un punto, de 
tres letras. Algunos comandos permi- 
| ten utilizar la «?» y el «*» para indicar- 

le al operativo que en esa posición vale 
| cualquier letra o grupo de letras. 

La tabla de nombre de archivo tiene 
el siguiente formato (tabla 3). Los bits 
más significativos de los caracteres del 
nombre y tipo de fichero se utilizan 
para marcar información suplementa- 
ria, con algunos de ellos reservados 
para el sistema y otros de usuario. En 
ficheros de más de 16 K el fichero ocu- 
ра 2, 3... extensiones de 16 К, v, рог 
lanto, esas entradas de directorio. 
Aunque existen ligeras diferencias en- 
tro las versiones de CP/M en la forma 
de tratar los ficheros, la estructura no 
muestra grandes variaciones. No hay 
que olvidar que el CP/M se ha diseña- 
do para una gran variedad de máqui- 
nas, у que se trata de un operativo que 
ha evolucionado durante más de diez 
años. 

El СР/М Plus tiene bastantes dife- 
rencias con respecto a las versiones 
anteriores. Puesto que se ha construi- 
do para poder direccionar más de 
64 K, el BIOS estándar no es más que 
una tabla de saltos que permite acce- 
der, mediante un mecanismo de pagi- 
nación, al programa ejecutivo, que 
está en las «otras» 64 K, Alli se en- 
cuentra también la memoria de panta- 
lla, otra de las limitaciones importantes 
del CP/M cásico. En efecto, las panta- 
llas de los ordenadores evolucionaron 
desde la simple pantalla de texto, que 
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по ocupa apenas memoria, a la panta- 
lla gráfica del Amstrad, que se «come» 
16 К a cambio de los maravillosos grá- 
ficos que ofrece. 

Esta memoria de pantalla, en е! 
СР/М 2,2, está en la parte alta de la 
memoria, junto con el BIOS, lo que 
hace una memoria efectiva de 48 K. 
Con las 128 K y la paginación se dis- 
pone de un СР/М máximo, con ип área 
do usuario do más de 61 K. 


Los comandos 
residentes 


Ya hemos dicho que, cuando apare- 
ce el «A>», el usuario puede intro- 
ducir un comando. El intérprete de 
comandos г га a ver si la palabra in- 
troducida coincide con alguno de los 
comandos internos. En ese caso lo 
ejecuta, Si no se corresponde, bus- 
ca en el disco un archivo del mismo 
nombre y de tipo COM (Comando), 
lo carga en memoria y lo ejecuta. 


Amstrad. 


Los primeros comandos se llaman 
residentes, los segundos transitorios, 

Los comandos residentes son: 

ERA, que borra uno o más ficheros 
del disco. 

DIR, que muestra información sobre 
los ficheros de usuario del disco. 

DIRS, Igual que DIR para los сотап- 
dos del sistema, 

REN, que cambia el nombre a un 
fichero. 

SAVE, que permite crear un fichero 
“оп el contenido de la memoria. 

TYPE, que escribe un fichero de tex- 
to en la pantalla. 

USER, que permite dividir el disco 
en hasta 16 zonas de usuario. 

Además, en sistemas de más de un 
disco, se puede cambiar el disco por 
defecto escribiendo la letra que lo iden- 


Digital Research, firma que ha hecho el CP/M, ofrece su gama de productos para 


tífica seguida por «:». Por ejemplo, el 
usuario de PCW 8256 puede mejorar 
mucho la velocidad de trabajo copian- 
do los comandos transitorios que usa 
al disco de memoria «M:» y luego es- 
cribiendo tras el «А>» Un «M». El sis- 
tema contestará «M>» y, a partir de 
ese momento, buscará los comandos 
en el disco simulado en memoria. Otro 
comando que se puede utilizar es 
CONTROL P (abreviado Р), poro 
sólo si dispone de impresora. Así ha- 
cemos que todo lo que aparece en 
pantalla vaya también a impresora. 
Una nueva pulsación de Р desactiva 
la impresora. 


Los comandos 
de disco 


Los ficheros de disco cuya extensión 
sea COM se consideran como coman- 
dos del sistema, si tecleamos «Hola», 
el ordenador busca en el disco y aca- 
Ба por contestar «HOLA?». Eso quie- 


re decir que ha buscado el comando 
HOLA, que по es residente, en el dis- 
CO, y que no existe un fichero HOLA, 
COM. 


El número de ficheros transitorios 
depende de la instalación y de los dis- 
cos de utilidad de que dispongamos. 
Por ejemplo, un programa de contabi- 
lidad se puede activar como CONTA, 
ya que estará en el fichero CON- 
TA.COM. 


Otro tipo de ficheros importantes 
para el programador son los Пслегиз 
de comandos, que ahorran introducir 
sucesivamente una serie de comandos 
del teclado. Estos ficheros tienen la ex- 
tensión SUB, y se ejecutan mediante 
el comando SÚRMIT. Los usuarios da 
10603, еп CP/M Plus, pueden ejecu- 
tarlo como LOGO3 (llamando al fiche- 


\ | Avda. de la Constitución, 260 
Е! Tels. 675 78 54-675 78 22 
| Torrejón de Ardoz 
Madrid” 


7 РРОТОМЕС: 


Compatible con: SPECTRUM, ATARI, 
COMMODORE, SPECTRAVIDEO, 
AMSTRAD, CANON Y OTROS. 


Spectrum, Atari, Commodore, Spectravideo, Amstrad 
y Canon son marcas registradas por sus respectivos 
propietarios. 


GARANTIZADO POR 3 MESES 


FCB (Bloque de Control de Archivos) 
Byte Nombre Contenido 
00 ET Tipo de entrada. E5-libre o borrada 
On Num. de usuario 
01-08 FN Ocho caracteres de nombre, con espacios a la derecha, 
09-08 FD Tipo de fichero. Los bits más significativos de cada byte 
sirven de Indicadores de protección de escritura, etc. 
oc EX Número de extensión. Cada 16K de fichero éste ooupa una 
nueva entrada en el directorio. 
OD No se usa CP/M 2,2 
OE s2 Es parte de la cuenta de extensiones, 
OF RC Cuenta de registros. Una extensión puede tener hasta 128 
гедізігоз de 128 bytes. 
10-1F DM Mapa del Disco. Es una tabla con los bloques lógicos que 
contienen partes del fichero. 
20 NR Registro siguiente. El siguiente registro que se va a leer o 
escribir. 
21-23 Se utilizan como puntero para el acceso directo. 


ro COM) o bien como SUBMIT 
LOGOS, que ejecuta el fichero 
LOGOS. SUB, que a su vez contiene 
los comandos SETKEYS KEYS. DAL 
(para reasignar el teclado para LOGO) 
y LOGO3, que ejecuta el programa 
propiamente dicho. 


Muchas posibilidades, 
al precio de un poco 
de estudio 


Мо hemos hecho más que subrayar 
unas pocas de las posibilidades del 
СР/М. Esto oporativo, pensado para 
los programadores, incluye además un 
monitor de código máquina (DDT o 
SID), un editor (ED), rutinas para vol- 
car un fichero en hexadecimal 
(DUMP), etcétera. 

Una exploración exhaustiva de to- 
das las posibilidades agotaría el espa- 
cio de la revista, y más aún si dispu- 
siéramos de él, Existen buenos libros 
sobre el tema, que comentaremos en 
Un próximo número, y seguiremos tra- 
tando este segundo operativo, que 
puede convertirse en el alma de nues- 
tro ordenador profesional. 
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БАК FFFH — — —— |5ІЗТЕМА DE ENTRADA 
(max) BIOS Y SALIDA 
BDOS SISTEMA DE DISCO 
INTERPRETE 
ССР DE COMANDOS 
| AREA DE PROGRAMAS 
TPA DE USUARIO 
256 0100H INTERFOG ENTRE EL 
SYSTEM CP/M Y LOS PROGRAMAS | 
PARAMETERS DE USUARIOS 


o 0000H 


т PROGRAMA DEL AÑO 
MA "NI EN INGLATERRA 


V « 
С DATABASE жай” 
PUBLICATIONS p 


PROCESADOR DE 


¡ideal para escribir cartas e informes! 
Coracterísticas: Visualización continua del 
tiempo е Contador de palabras (indicando 
las palabros por minuto) е Texto normal o 
doble, en pantalla o impresora. 


2 HOJA DE CALCULO 
¡Utiliza tu micro para controlar tus cuentas! 
Características: Cifras visualizadas en filas 
y columnas е Actualización permanente e 
Actualización reflejada instantáneamente 
en toda la hoja e Grabación de los 
resultados para futuras modificaciones. 


З GRAFICOS 
¡Convierte 8505 números en maravillosos 


s opcion 
aisponi 


del procesador 
denostrante laS 


uiti ура UIS 


метанал, 3 


BE ou Sitten tena 20 
gráficos! Características: Gráficos de barras A] eee S ass тартам 
en tres dimensiones е Gráficos de pastel e Ee 
Histogramas. seen 
4 BASE DE DATOS 


ilgual que los archivos de la oficina! 

Características: Cargar ficheros con solo 

pulsar una tecla e Closificación e 

Modificación e Listados e Büsqueda. 

* En Castellano 

*Servimos en 
48 Horus 


¦ Envenoso MICRO BYTE | 


A P? Castellana, 179, 1* - 28046 MADRID 1 
TRCDEFGHIJKLNM [ 


Nombre 
Apellidos 

Dirección 

Población! 

D.P. 


*Versión disco AMSTRAD Р.УР. 3.900 pta: 


Teléfono. 


Deseo que me envien[ | ejemplor/es 
del programa MINI OFFICE 
PARA EL MICROORDENADOR 
SEÑALADO 

ІП AMSTRAD CI COMMODORE О SPECTRUM 
C) AMSTRAD VERSION DISCO 

sing le envio 


INCLUYO TALON NOMINATIVO 
CONTRA-REEMBOLSO 


Pedidos por teléfono 


91 - 442 54 33/44 


| Amstrad incorpora, como. 
muchos de vosulrus ya sas 
bréis, un procesador espe- 


Mua т * ж ж cial para controlar el soni- 
| *k y Жж, Жж Ж» do. Se trata del AY-3-8912, hermano 
RS E del que llevan los MSX, y un instru- 
ж”. жж DE mento muy potente. Pero este circuito. 
* ж, г по servirá де nada sin un programa 

+ 


que le saque rendimiento. El progra- 
ma se llama gestor de sonido (sound 
manager), y es el tema de nuestro са- 
рішо de hoy. 

La salida de sonido de los CPC es 
una clavija estéreo, aunque su sonido 
ев habitualmente mono por llevar un 
solo altavoz en el interior de la máqui- 
па. Se trata de un pequeño altavoz, 


Que le hace poca justicia a las posibi- | 
lidades sonoras del ordenador, | 

La pastilla que incorpora el Amstrad 
liene realmente tres canales. Supa- 
niéndolos numerados como canal 1, 
canal 2 y canal 3, la salida al jack es- | 
téreo se da como canal 1 más canal 
2 por la salida izquierda, y el canal 2 
y canal 3 por la salida derecha. 

No obstante las facilidades del 
Amstrad no terminan aqui siendo ро- 
sible gestionar esta pastilla, accedien- 
do directamente a ella mediante co- 
mandos firmwaro о si so prefiero се 
puede acceder usando el software 
disponible por Locomotive. 

Vamos a estudiar superficialmente 
la funcionalidad de los parámetros a 
introducir a nuestro Amstrad, 

Como es bien sabido el sonido no 
es más que una onda, por lo que re- 
sulta obvio que su comportamiento ha. 


SX ЭЕ Ww ¥ ¥ 4 + de seguir las mismas reglas de cual- 
E E EDESA quier movimiento armónico. Ernpece- 
“ Ж ж X E ж ж ¥ mos por ver la amplitud de la onda. La 
құқұқ”, amplitud nos define realmente el volu- 

“ч ж ж X yyy men del sonido, aunque combinando 

E жж” los diferentes parámetros podemos 


conseguir efectos de más o menos vo- 
lumen. Si introducimos pues el valor 
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cero a este parámetro está claro que 
no vamos a oir nada. Los valores dis- 
ponibles para este parámetro oscilan 
entre O y 15. La frecuencia es el nú- 
mero de veces que se repite una nota 
en la unidad específica de tiempo. El 
período viene generado por la siguien- 
te fórmula: 


125.000 
FRECUENCIA 


Haciendo una pequeña referencia a 
la estructura de una nola musical, зе 
pueden diferenciar tres fases en la 
ejecución de la misma, esto ез. 

Fase 1: fase de crecida en la que la 
nota va «creciendo» 


PERIODO = 


Fase 2: fase de sostenida o fase en 
la Cual la nota se ejecuta y mantiene. 

Fase 3; fase de decaimiento en la 
cual una vez terminada la ejecución 
de la nota ésta todavía tarda un tiem- 
po en desaparecer del todo. 

Con el fin de igualar al máximo las 
posibilidades de un instrumento de 
música, nos está permitido controlar la 
duración de las tres fases expuestas 
anteriormente. 


Potente, 
pero complejo 


La complejidad de la gestión del so- 
nido del chip que incorporan los Ams- 
trand hace que el operativo facilite su 
programación mediante interupcio- 
nes. Aunque para hacer sonar la má- 
Quina hasta proporcionarle una fre- 
cuencia y una duración, un control 
más completo del sonido nos obliga a 
poner en Juego muchos mas pará- 
metros, 

Perd el estudio de todos los pará- 
metros nos llevaría Un artículo de ma- 
yor longitud que éste por lo que deja- 
тов el resto de los parametros y ип 
estudio mucho más profundo para una. 


A FONDO 


Llamada Función Notas 
BCA7 Resetea el Sound Ma- 
nager 
BCAD Testea el estado de un A; contiene un canal según: 
canal 1000000 Canal A 
01000000 Canal В 
00100000 Canal С 
A: contendrá en salida el estado del 
canal según BITS significan: 
0 1 2п. de notas libres еп el canal 
3. espera de sincronism 
Con canal A 
4. espera de sincronism 
Con canal В 
5. espera de sincronism 
Con canal С 
6. el canal esta «sostenido» 
7. el canal está activo 
BCB3 Libera un canal «sos- A conliene el canal según cuadro an- 
tenido» terior 
BCBG Рага (одос іо sonidos Retiene todos los canales pero sin 
de forma inmediata perder la información 
BCB9 Consigue la dirección A contiene la envolvente por lanto һа 
de la envolvente de de ser un número de Та 15. HL con- 
amplitud tendrá la dirección de la envolvente de 
amplitud. BC contendrá la longitud de 
la envolvente. d 
BCC5 Consigue la dirección Según el cuadro anterior. 
de la envolvente de \ 
tono 
BCo5 Iniclaiza el cassete 
manager 
BC6B Activa o desactiva los А si cero son activados. A si uno son 
mensajes del cassette desactivados 
BC6E Activa el motor 
BC/1 Desactiva el motor 
ВС77 Abre un fichero сото В: contiene la longitud del fichero 
input HL: contiene la dirección del fichero 
DE: contiene la dirección del buffer de 
salida 
BC7A Cierra un fichero. 
BC80 Lee un caracter de un A: contiene el caracter leído 
fichero de entrada 
BC89 Testea el fin de fichero Si es final Carry True 
всвс dore un fichero de sa- Ver cuadro de BC77 
lida 
BC95 Escribe un caracter А: contiene el caracter 
ВСА! Lee un registro del HL: contiene la dirección donde dejar 
cassette los datos. 
DE: contiene la longitud de los datos. 
A: contiene un caracter de sincronis- 
mo según: 
Pt2C Registro cabecera 
Pt16 Registro de datos 
—BC9E . Graba un registro igual que en cuadro anterior 
BCA4 Verifica un registro Igual que en cuadro anterior. 
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Un buen lector de cabeceras es la clave de 
cualquier sistema de recuperación de 
información en cassette. 


EJEMPLO DE GESTION DE CABECERAS 
10 ¡CONVERSION DE UN BLOQUE CUALQUIERA DE UN PROGRAMA A 
ZO ¡BLOQUE DE CARGA DE DATOS O PRIMER BLOQUE DE CARGA 
29ВЕ С018ВВ 30 INICIO: CALL #3218 3 ESPERA UNA FECLA PARA L 
EER REGISTRO 
' 40 ¡DE CABECERA 
29c1 218913 so L HL, 5000 POSICION DE CARGA DE DAT 
05 ЕМ MEMORIA 
2904 110001 $0 Lo DE, 256 LONGITUD DEL REGISTRO CA 
BECERA 
П 29C7 3E2C 70 LD а, #2с i CARACTER DE SINCRONISMO 
PARA CABECERA а 
1 29C? CDALBC 80 CALL #ECAL i LECTURA DE UN REGISTRO 
10 --- 
| 
D 
d 29CC ЗЕ7Р 120 LD А,91111111 
29СЕ 329F13 130 LD (5023),A 
140 
150 | 
150 i 
170 | 
180 
290! CDISEB 190 CALL НЕРІ 
2904 218813 200 LD HL, 5000 
2907 110001 210 LD DE, 254 
2704 5Е2С 220 LD а, и2с 
29DC СРФЕРС 230 CALL ЯВСЯЕ i GABACION DE UN REGISTRO 
29DF cs 240 ВЕТ 


Ampliamos la red de distribuidores 


AMSTRAD Y SPECTRAVIDEO 


Solicite información a la 
Delegación Indescomp Andalucía 


AAVV 
IWFORMATICA ў 
Paseo Marítimo, 36-11-С 29016 Málaga Telf. (952) 22 82 86 
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PERSONAL PRINTER 


Ш NEAR LETTER OUALITY PRINTER 


COMPATIBILITY WITH IVIOST PERSONAL COMPUTERS 


* 55 
ЕЛЕНА 
НАНЕ РЗ 


ESPECIFICACIONES. 


1. Método de Impresión 
Serie de impactos por matriz 
de ауа 


2. Cabezal Impresor 
9 agujas (reemplazablo) con 
expectativa de vida de 50. 
millones de caracteres a 
100 % de uso continuo. 


3. Velocidec de impresión 
Impresión a 105 cps uni o 
bidireccional, búsqueda 
lógica optimizada, capacidad 
Че impresión 45 lpm a 10 
Gp... 200 ms de salto de linea 
con espaciado de 1/6" 


Espaclado Interlínea 
1/6", 1/8", 7/72", programable 
N72", N18", 


6. Alimentación de papel 

8) Tractor ajustable entre 4% 
ута". 

b) Alimentación a fricción 
para hojas sueltas епце 
ЕСИ 

6. Corte се papel 

Se puede imprimir desde 

principio de página hasta una 

pulgada de fin de papel. 


7. Selección de caracteres 
Todos los 98 caracteres 
ASCII, 96 itálicos, 96 М.О, 
todos ellos con correcta 
impresión de los trazos 
аевсепавтоз, y Y set de 
diferentes idiomas 
seleccionables. 


EE 
ium 


10 


" 


12. 
13. 


Además con 2K buffer, 32 
caracteres definibles por 
usuario y con ВК buffer, 256 
caracteres cefininles por 
usuario, 


Gráficos 
Densidad normal 480 puntos 
pot línea, doble densidad 
360, cuadruple densidad 
1920, CRY gráficos 640, 
plotter gráfico 576, CRT 
Gráficos 720 puntos por 
linea. 


Modos da Impresión 
Standard, doble impresión, 
enfatizado, itálica, supra y 
subíndices, mitad altura y 
мо. 


Tamaños де Impresión 

a) Normal (10 cpi) 2,1 mm 
(а) х 255 mm (h) 

5) Normal expandido (5 cpi) 

с) Elite (12 cpi) 

Ч) Elite expandido (9 си) 

в) Comprimido (17 cpi) 

0 Comprimido-expandido 
(8,5 ері) 

9) Espaciado proporcional 

h) Proporcional expandido. 


Teat cacritura 
Manteniendo apretado LF 
(Salto de linea] cuando se 
acciona el interruptor de 
puesta en marcha ОМ. 


Subrayado continuo. 


Tabulador 
Existen 32 posiciones de 
tabulación por linea. 


TODAS LAS ESPECIFICACIONES PUEDEN SER CAMBIADAS SIN PREVIO AVISO. 
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16. 


17. 


18, 


19. 


20. 


а! 


5. 


Longitud de formato 
El standard do 66 líneas, con 
espaciado de lineas y 
longitud del formato. 
programable. 

VFU eláctrico. 

Tamaño butter 

1 línea standard. 

Butter RAM 

2 К byte (standard) 

8 K byte (opcional). 

Tope posicionador de 
papel contínuo, 
desplazable parte anterior 
о posterlor. 

Intertece 

Standard parddo certronics 
de B bits, 

Serie RS232 C opcional. 
Grosor papel 

Máximo 2 copias, 40 g/m* 
peso contínuo, sensor papel 
Operación con 
Interruptores 

De fácil acceso, 

Caracteres por Inea 
Normal: 80 

Мота expand 0:40 
Comprimido: 132 
Comprimido expandido: 66 
Ее: 96 

Еме expandido: 48 
Proporcional: п 

Cinta Impresora 
Autorrotintada, mediante 
tampón interno, cartucho 
compacto de cinta negra 
fácilmente reemplazablo у 
bajo coste, 


23. Tamaño 
118 (п) ж 276 (1) x 405 (9). 
24. Tensión alimentación 
220 vl 50 Hz. 
25. Entrada de papel 
Frontal-horizontal. 
26. Retroceso 
Por software. 
27. Bajo nivel де ruldo 
2 velocidades: 
Velocidad lenta ае 52 CPS. 
Velocidad rápida da 105 cps. 
28. Elevadores Inferlores 
standard 
(para Ubicación del papel 
contivo debajo de la 
improsora) 
29. Motor: paso a paso 
30. Indicadores: 
е Conexión general 
* Fin de papol 
+ On line 
31. Interruptores 
ON/OFF, On line (SEL), salto 
de página (FF), salto de linea 
(LE) 
32. Compatible con la mayor 
parte de software 
existente 


DAcAmon 


DATAMON,S.A 
REPRESENTACIÓN EN ESPAÑA Ot 
IMPRESORAS PROFESIONALES- 


PROVENZA, 185-37, в. 1 
Tel 193) 207 27 04 06025 BARCELONA 


PUEDE 


psu 


próxima edición, reservando el resto 


del espacio para dar un pequeño те- 
paso a las indirecciones del firmware. 


Cassette manager 


El cassette manager como su nom- 
bre indica es el gestor y responsable 
directo del funcionamiento del casset- 
te, tanto en lo referente al modelo 
CPC-464, como a cualquier cassette 
conectado a cualquiera de los demás 
modelos. 

Este sistema gestiona tanto la es- 
tructura de los datos en cinta como su 
fiabilidad de uso. Como se explicó en 
su momento Amstrad graba los datos 
por bloques, que constan de dos re- 
gistros: registro de cabecera y regis- 
tro de datos. El primero es el encarga- 
do de avisar al Amatrad lo que зе va 
a leer, de qué tipo es el fichero, si está 
protegido, etc. El funcionamiento de 
este sistema es tan perfecto que si se 
varía en lo más mínimo, los efectos 
pueden ser desastrosos. Por ejemplo 
un tipo de protección incluido en un 
juego comercial, ha consistido en anu- 
lar el registro de cabecera del bloque 
y aumentar la longitud del registro de 
Calas, соп los resultados de que con 


cintas originales del mismo producto 
el sistema de carga falla en un 60 por 
ciento de las veces con lo cual han 
conseguido anular una de las mejores 
características del Amstrad; su mag- 
nífica gestión de las cintas que en un 
99 por 100 de las veces funcionaba 
sin ningún tipo de problema, 

Retomando el hilo de nuestro articu- 
lo, en esta entrega vamos a intentar 
dar una serie de datos complementa- 
rios al artículo anteriormente publica- 
do sobre el cassette. 


Hasta dos ficheros 
simultáneos 


El Amstrad es capaz de gestionar 
dos ficheros de cinta abiertos simultá- 
neamente; uno de ellos como entrada 
de datos y otro como salida, lo cual 
permite hacer un sistema de gestión 
bastante completo teniendo en cuen- 
ta las limitaciones proplas de una сїп- 
la. 

Los nornbres de los ficheros en cin- 
ta permiten hasta 10 caracteres con 
signos entre caracteres, pero lo reco- 
mendable es dar nombres de máximo 
ocho caracteres para así poder pasar 
nuestros programas a disco sin exce- 
siva complicación. La estructura de 
los registros, como todos recordaréis 
fue comentada en el número 2 de 
nuestra revista, por lo que para el si- 
guiente ejemplo es mejor que nos ге- 
mitamos а ella 


La. ДИВАТА. 


DISTRIBUIDORES DE PRODUCTOS INFORMATICOS Y ELECTRONICOS 25.9 


Tenemos todo lo que necesitas en informática 
AL MEJOR PRECIO 


y el mejor asesoramiento para tí y tu ordenador 


Hermosilla 75, 1- Ofic, 14 - 28001 MADRID Tel.: (91) 276 43 94/435 04 70 
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La mayor colección de programas para AMSTRAD 


ASALTO. 


3D STUNT RIDER, 


осховенса. Intento bahr al re 
mundial de solto sobre autobuses! 
PNP CASSETTE 1.600 pis 


AIRWOLF. 


BRAXX BLUFF. 


Lónzole a exploror mundos. 
Uestiziuudus uon ios Genturiones. En 
сода lugor que alerrices te oguordan 
peligros y desasltes esperados. 
PP. CASSETTE: 1.6000 pis. 


DRAGONS. 


HOCKEY. 


[I 
4006480 compio on un emecionanto 
partido de hockey sobre hielo, conlra un 
amigo o conlra lu AMSTRAD. 

PVP CASSETTE 160005 DISCO: 2500 pls 


GRAND PRIX RALLY Il. 


jusia la emocion de la guerra. 
desarrolla toda una batalla aeronava. 
Tus enamigos no le dorán cuartel y na. 
aludes lo más importante: осоп 
PVP. CASSETTE: 1.600 pls. 


Cinco оепійсов estan relonidos en las 
prolundidades de una розе ¿Podms 
rescotarios pilolondo el inigualable ү 
sofisticado helicóptero? Destruye las. 
cojas de conliat de la detansol 

PVP CASSETTE 1800 ple. 01900 2500 pis 


CONSTELACIONES. 


Observa las más importantes esirellas 
del universo en su posición rec! (grados 
y horas). Descubre sus nombres y 
aprende а icentiicarlos y conocerlos- 
РМР CASSETTE 1600 pis. 


ESPAÑA, 


Apasiónole en una inquietante aventura 
опдинопдо скодогез Camino, керо y 
solta paro salvar lu vga de 105 aragones 
rojos 

PVP CASSETTE 1600 pis 


ESTIMATOR RACER. 


Desarrolo tu capacidad de calculo 
urménco. Conduce tu coche рог el сот, 
en una correra contra reloj con іс 
respuesta malemática más bproxrmodo. 
4 niveles do бошой 


РУР DISCO: 2500 pls. 


Ройсрс en di mundo da los Пойме con. 
Grcullos en res dmensiones. Atonesa. 
fido, lura, desiertos, nieblo y eva los. 
choques con lus compalidores 
Sorpréndete creando lus propios 
Tacortdos. 

PP CASSETTE | ADO pre DISCO. 9400 ple 


EL CUERPO HUMANO. 
EL ESQUELETO. 


¿Cuantos nombres бе nuesos de nuestro, 
esqueleto өг 2 de recordor? 
Aprende y diviértete con esto excelente 
programa educalivo 

PVP. CASSETTE: 1800 pis. 


Avda, dol Maditerránno, 9. Tela, 433 15 48 - 43) 4876. 24007 MADRID Delegación Cataluña: Tarragona, 110 -Tal 325 10 58. 08015 BARCELONA 


* Envíos a domicilio a toda España 
е Sin gastos de envío 
e Servicio rápido 


Ref. Titulo 

AMC-100 HOME RUNNER 
АМС-101 GRAND PRIX 

АМС-102 HARRIER ATTACK 
АМС-103 SPANNERMAN 
AMC-104 AGUILAS DEL ESPACIO. 
AMC-106 LA PULGA 

АМС-107 FRED. 

АМС-108 MASTERCHESS 
AMC-109 LASERWARP. 

АМС-110 HAUNTED EDGES 
AMC-111 CODENAME MAT 
АМС-112 AMSGOLF 

АМС-113 HUNCHBACK (QUASIMODO) 
AMC-114 HUNTER KILLER 

АМС 115 ROLAND EN EL TIEMPO 
AMC-116 ATOM SMASHER 
АМС-117 ELECTRO FREDDY 
АМС-118 ADMIRAL GRAPH SPEE 
AMC-119 COMANDO ESTELAR 
АМС-120 MANIC MINER 

АМС-121 ASTRO ATTACK 
АМС-122 QUACK 

AMC-123 BILLAR (SNOOKER) 
АМС-124 ROLAND EN EL TREN 
АМС-125 LA PLAGA GALACTICA 
АМС-126 ROLAND EN EL INFIERNO 
АМС-127 SIMULADOR DE VUELO 377 
АМС-128 ROLAND AHOY 
АМС-129 EL PUENTE 

AMC-130 МВ. WONG 

АМС-132 MUTANT MONTY 
АМС-133 TENIS. 

AMC-134 LABERINTO DEL SULTAN 
АМС-135 PUNCHY 

АМС-136 ALIEN BREAK 

АМС-137 FRUIT MACHINE 
АМС-138 ОН MUMMY 

АМС-139 SPLAT 

АМС-140 CRAZY GOLF 

АМС-141 CUBIT 

ANC-142 3D INVASORES 
АМС-143 EL PREMIO 

АМС-144 JET BOOT JACK 
ANC-145 ROLAND EN EL ESPACIO 
AMC-146 PYJAMARAMA 
ANC-147 BOY SCOUT. 

АМС-148 FANTASTIC VOYAGE 
АМС-149 THE KEY FACTOR 
АМС-150 JAMMIN 

АМС-151 SUPER PIPELINE 
AMC-152 TRAFFIC 


ЕЕЕ 


Si no encuentra el programa 
que está buscando, el periférico 
que necesitao el libra que 

le apetece... 


Tenemos todo para su 


AMSTRAD 


АМС-153 CATASTROPHES 

АМС-154 SORCERY 

АМС-155 ROLAND Y LOS CUBOS 
АМС-156 FRANK'STEIN 

АМС-157 GATE CRASHER 

АМС-158 EL JUEGO DE LOS NUMEROS 
AMC-159 HOCKEY 

AMC-160 AIR WOLF 

AMC-161 GRAN PRIX RALLY II 
AMC-162 SUBTERRANEAN STRYKER 
AMC-163 ALIEN 

AMC-164 3D STUNT RIDER 

AMC-165 DRAGONS 

АМС-165 BRAXX BLUFF. 

AMC-167 HOUSE OF USHER 

AMC-168 DEFEND OR DIE 

АМС.169 AJEDREZ TRIDIMENSIONAL (Serie Oro! 
АМС-170 3D GRAND PRIX (Serie Ого) 
AMC-17! 3D BOXING (Serie Oro] 
AMC-172 SUPER TRIPPER (Serie Oro) 


'DUCATIVOS 


Ref. Titulo 
АМС-300 ANIMAL, VEGETAL, MINERAL 
AMC-301 PLANETARIUM/TIERRA. 


АМС-302 RIOS/CAPITALES 
AMC-303 PERSONAJES/CRONO 


PROFESIONALES 


Ref. Titulo 


AMC-500 Contabilidad Personal 
АМС501 AMSCALC (Hoja Cálculo] 
АМС-502 AMSWORD [Proceso Textos Simple) 
АМС-502 AMSWORD II. Proceso de Texto 
АМС-504 AMSBASE. Base de Datos 
АМС-505 STOCK-AID 
АМС-506 GENERADOR DE FACTURAS, 
FICHAS Y DOCUMENTOS (Invostat) 
АМС-507 BASE DE DATOS Y ETIQUETAS 1,900.- 
АМС-508 TRATAMIENTO DE FICHEROS (Маве е) 4300. 
АМС-509 EL EMPRESARIO. 
Instruc. para dirigir su negocio 4300 
AMC-510 HOJA DE CALCULO (MasterCalci 


Ref. Titulo PNP. 


АМС-700 DEVPAC. ENSAMBL/DESENSAMBLADOR 4.300.- 
АМС-701 HISOFT PASCAL 4.900.- 
АМС-702 Diseñador de Pantallas. 

АМС-703 AMSDRAW Gráficos y dibujos 


АМС-704 GUIA DE PASCAL (libro) 
АМС-705 FORTH 
AMC-706 AMSTEST 


Ref Titulo 


АМ0-100 FRED/LA PLAGA GALACTICA 
AMD-101 LA PULGA/AMSDRAW 
AMD-102 ROLAND EN EL ESPACIO 
AMD-103 SORCERY 

AMD-104 PYJAMARAMA 

AMD-105 EL JUEGO DE LOS NUMEROS 
АМО-106 HOCKEY 

AMD-107 AIRWOLF 

AMD-108 GRAN PRIX RALLY II 
АМО-109 SORCERY PLUS (Serie Oro) 
AMD-110 AJEDREZ TRIDIMENSIONAL (Serie Ого} 
AMD-111 3D GRAND PRIX (Serie Oro) 
АМО-112 3D BOXING (Serie Oro) 
AMD-113 BEACH HEAD (Serie Oro) 
AWVD-114 SUPER TRIPPER (Serie Orc] 


Ref. Título 


AMD-300 MIRANDO LAS ESTRELLAS 
AMD-301 PLANETARIUM/CRONO/TIERRA 
AMD-302 CAPITALES/RIOS/PERSONAJES 


Rel Titulo 


АМ0-500 PLANIFICACION DE PROYECTOS 
(Project Planner] 
AMD-501 TOMANDO DECISIONES 
(Decision Maker] 
AMD-502 BASE DE DATOS CP/M (Micropen) 
АМ0-503 TRATAMIENTO DE TEXTOS CP/M 
(MicroScriptl 
AMD-504 TRATAMIENTO DE TEXTOS (Amsword) 
АМ0-505 CONTABILIDAD GENERAL. 
ANID-506 CONTROL DE STOCK 
АМ0-507 CONTROL DE VENCIMIENTOS 500. 
AND-508 HOJA DE CALCULO CP/M (MicroSpread) di 500- 
АМ0-509 EL EMPRESARIO. 
(Instruc. para dirigir su negocio] 
AMD-510 MASTERCALC 
AMD-511 TRATAMIENTO DE TEXTOS PROFESIONAL _ 
¡Amsword tl) 


Ref Titulo 


AMD-700 HISOFT PASCAL 
AMD-701 ENSAMBLADOR/DESENSAMBLADOR 


[DevPac) 
AMD-702 DISEÑADOR DE PANTALLAS 
(Screen Designer) 
AMD-703 GU DE PASCAL 
AMD-704 FORTH 


Ref. Titulo 
АМО-900 DISCO VIRGEN 3" 


Ref. Titulo 


AML-100 Curso Autod de Basic | 
AML-101 Programando con Amstrad 
АМ.102 Juegos sensacionales para Amstrad 
AML-103 40 Juegos Educativos para Amstrad 
AML-104 Guia de Referencia Basic 
para el Programador 
AML-105 Musica y Sonidos con el Amstrad 
AML-105 Hacia la Inteligencia Artificial con Amstrad 
AML-107 Código máquina paro principiantes con 
Amstrad 
AML-108 Curso autodidáctico Basic Il 
AML-109 Programando Basic con AMSTRAD: 
AML-110 Tecnicas de Programacion de Graficos 
en el Amstrad 
AWL:500 Manual de Firmware (en inglés) 


Ref. Titulo 


AMP-100 Unidad de Diskette con controlador 
AMP-101 Unidad de Diskette sin controlador 
ANP-102 Modulador TV para 464 

AMI- 103 Impresora 

AMP-104 Cable Centronics 

AMI-109 Impresora Printer 130 

AMP-105 Cable 2? unidad disco 

AMP-106 Cable Cassette 004 (audiu) 
AMP-107 Modulador TV para 564 y 6128 
AMP-108 Sintetizador de Voz 55A-1 
AMP-109 Interface Serie RS 232 С 

SVP- 116 JOYSTICK QUICKSHOT 1 

SPV- 117 JOYSTICK QUICKSHOT |І 

S A PUE MI 


:*EOLÉFIN de PEDIDO 


e Ке! TITULO Cat] РУР. TOTAL 


Dirección 
Población 

D.P. Telefono 

Incluyo talón Bancario a nombre de "CHIPS 4 TIPS” 
Contra Reembolso 


ЕММЕМ ESTE BOLETIN A; 


. 
. 
® ‘CHIPS A TIPS", Paseo de la Castellana, 126 2046 MADRID 
е Feridas пог teléfono (91) 4116463. 

9occececcecveceeccccccec 


"SOFTMAIL" Es un servicio de "CHIPS & TIPS" 


De manos de Probe Soft, 
nueva empresa en juegos 
para Amstrad, llega un 
gran programa para quien 
disfrute con las aventuras 
animadas y de acción. Del 
mismo tipo que el 
Sorcery, y aunque menos 
cuidado en el terreno 
gráfico, ofrece un 
argumento mucho más 
original. Montados en un 
minisubmarino y 
explorando cada camarote 
de un pecio pirata, 
deberemos encontrar la 
legendaria Corona del 
Diablo, una valiosísima 
corona de oro que 
descansa desde hace 
muchos años en el fondo 
de los mares. 
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Programa: The Devil's 
Crown 


En las entrañas de un 
barco hundido 


| mapa incluye unas 40 
pantallas distintas, por 
las que podremos mo- 
vernos siempre que ten- 

gamos suficiente oxígeno. En ellas 
encontraremos diferentes objetos, 
todos los cuales nos serán de 
suma utilidad si los utilizamos en el 
momento adecuado. Para cogerlos 
hay que pulsar el botón de disparo 
cuando pasamos sobre ellos; da- 
das las limitaciones de potencia de 
nuestro pequeño vehículo sólo po- 


ІНІ 


| 


| 


Саппоп store: 
You are carr! 


AS 
dremos llevar uno cada vez. En la 
parte baja de la pantalla se nos in- 
dica (en inglés) cuál es el camaro- 
te donde estamos, en qué cubierta 
se encuentra y qué objetos trans- 
ропатов en ese momento. Un ob- 
jeto importante es la linterna, sin la 
que no veremos nada en algunos 
de los camarotes. 

A lo largo del juego nos encon- 
traremos con algunos enemigos. 
Los más curiosos son unos peces 
(no de IBM), que pueden llegar a 
atacarnos si no les disparamos, 
pero que, en cuanto lo hacemos, 
huyen despavoridos. También es- 
tán los fantasmas de la tripulación 
pirata que llevaba el barco, que 
pueden resultar más o menos pe- 
ligrosos según el objeto que trans- 
portemos. Por ejemplo, un escudo 
los detendrá, una daga los destrui- 
rá, y si sobra llevamos una campa- 
na moriremos. Los fantasmas pue- 
den influir en nuestro nivel de охі- 
geno, aumentándolo o disminu- 
yéndolo según les dé. 

En la parte inferior de la pantalla 
también hay un contador que mar- 
ca la cantidad de oxígeno de que 
disponemos. Hay que estar atento 


Y main deck 


i 


ing a pile of coins 


— 089554 20 ""” 


y buscar alguna езсагапда autó- 
noma (léase bombona de oxigeno) 
en cuanto lleguemos a la zona 
roja, pues si se termina el aire (evi- 
dentemente) nos ahogaremos. 
Otro contador señala tas balas que 
nos quedan, cuando este número 
sea bajo podremos aumentarlo 
(hasta un máximo de 50) cogiendo 
alguna pistola de las que se en- 
cuentran por el barco. 


Dos bombas y un 
destino 


Llegar hasta la corona no es 
nada fácil, tendremos quo seguir 
una serie de fases antes de que la 
podamos ver. Primero hay que co- 
ger las tres campanas que se en- 


cuentran por el barco y llevarlas a | 


una habitación donde hay otras 
tres parpadeantes. Después hay 
que recoger los zafiros. Esto no es 
tan fácil como pueda parecer, pues 
es necesario llevar un determina- 
do objeto, que podremos cambiar 
por uno de ellos. Para finalizar hay 


quo dejar la llave adecuada sobre 
el candado adecuado para que la 
Corona del Diablo aparezca. 
Todo esto ha de hacerse muy rá- 
pidamente, pues las botellas de 
oxígeno que hay repartidas por 
toda la nave se ¡rán acabando, y 
con ellas nuestra existencia. Los 
simpáticos, aunque peligrosos, pe- 
ces morirán definitivamente cuan- 
do les disparemos, pero los fantas- 
mas sólo desaparecen temporal- 
mente cuando los destruimos, por 
lo que en cuanto volvemos a en- 
trar en el camarote donde se en- 
contraban aparecen de nuevo. 
Hay que tener mucho cuidado 
con las banderas piratas que ро- 
damos encontrar, pues suelen re- 
sultar bastante peligrosas si inten- 
tamos cogerlas. Conviene, por tan- 
to, ignorarlas y pasar de largo. 


Gráficos y sonido 


El movimiento de los sprites es 
rápido pero suave, con un efecto 
bastante bueno. El único defecto 
es que la rutina de impresión no 


está controlada por interrupciones, 
y además borra y vuelve a dibujar 
el sprite cada vez aunque éste no 
se haya movido. El resultado de 
todo esto es un parpadeo constan- 
te que puede resultar algo moles- 
1o, aunque no tanto como para ha- 
cernos abandonar un juego tan 
atractivo. 

Se puede disparar en la direc- 
ción en que se avanza incluyendo 
las diagonales y excluyendo arriba 
y abajo. Las ráfagas son rápidas y 
nutridas, por lo que resulta diverti- 
do utilizarlas. Los peces tienen 
unas reacciones bastanto ourio- 
sas, no se mueven al azar pero 
tampoco son los típicos autómatas 
que siempre resultan aburridos; 
parece que con sólo mirarlos fija- 
mente salgan a escape, mientras 
que si no tenemos balas se perca- 
tan de nuestro miedo y nos atacan. 

Todos los camarotes están per- 
fectamente ambientados, con сап- 
tidad de objetos, burbujas que su- 
ben constantemente, etc. Puede 


ADICCION: А 
PRESENTACION: A 
GRAFICOS: 


ACCION: 


АДАЛААД 
A 


ser bastante útil dibujar un mapa 
para no perdernos con tanta habi- 
tación, aunque los objetos en oca- 
siones cambian de sitio y no hay 
quién los localice. 

Los efectos sonoros cumplen su 
misión perfectamente. Además al 
comienzo de cada juego podemos 
disfrutar de una bellísima melodía 
del más puro estilo barroco. Las ar- 
pas que podemos encontrar por el 
barco tienen la curiosa facultad de 
tocar una сопа cancioncilla cada 
vez que las cogemos. 

Resumiendo, que este es un jue- 
go en el que tanto la estrategia 
como la acción son necesarias зі 
queremos llegar a algo. Un juego 
entretenido, con un argumento іп- 
teresante y el nivel de dificultad 
Justo para hacerlo atractivo desde 
el principio sin agotarlo en el pri- 
mer día. 
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Programa: Cylu 
Tipo: juego 

Distribuldor: Serma 
Formato: cassette 
Precio: 1.200 ptas. 


uestra tarea comienza еп 

una pequeña y atestada 

habitación en lo más pro- 

fundo de un gran laberin- 
to. Tenemos bajo nuestro mando a 
Cylu, un pequeño robot que debemos: 
guiar a lo largo y ancho del laberinto. 
Ocultos en éste hay 24 objetos que de- 
bemos dovolvor al ordenador principal. 
Durante la misión encontraremos 32 
campos de fuerza que nos impedirán 
el paso a muchas secciones del labe- 
rinto. Encontraremos objetos curiosos, 
como CPUs, que podremos transpor- 
tar (hasta un máximo de cinco), utilizar 
(los utilizables), examinar o volver a 
dejarlos. 


En la parto baja do la pantalla ара: 
recen los objetos que vayamos гесо- 
giendo, sobre alguno de ellos habrá 
una llave que indica que es el selec- 
cionado (con SHIFT) sobre el que ас- 
tuarán todas las funciones. Hay tan- 
ques de combustible que debemos uli- 
lizar cuando nos haga falta (también 
en la parte baja hay un contador que 
nos lo indica) 


El laberinto, en tres dimensiones, es 
grande y complejo, y además sólo po- 
demos ver una pequeña parte de él, 
por lo que es conveniente hacer un 
mapa según avanzamos. 


Los gráficos son buenos, poro al ser 
muy pequeños, hallarse apinados y 
medio tapados por partes del laberin- 
to, no siempre son reconocibles. Los 
efectos sonoros son bastante buenos, 
como también lo es la melodía inicial. 
Aunque no es excesivamente lento. 
para el tipo de gráficos que incluye, 
acusa una falta de acción bastante 
grande. Es más un juego de estrategia 
y aventura que un arcade típico. 


DUMMY RUN 


1 "igna" RADIO 


Programa: Dummy Run 
Tipo: juego 
Distribuidor: Erbe 
Formato: cassette 


ERBERT, el incansable 

bebé de «Everyone's A 

Wally», sigue haciendo 

de las suyas. Ha creci- 

do y se ha convertido en un travie- 

so niño que corretea y salta sin es- 

tarse quieto ni un momento, En 

esta ocasión һа ido de compras 

con Wally y Wilma y se ha perdido 

en unos grandes almacenes. 

Nuestra misión es guiarle a través 

de las secciones de la tienda y en- 

contrar, antes de la hora de cierre, 

la sala de objetos perdidos donde 

Wally y Wilma le esperan des- 
consolados. 

La estructura del juego es bas- 
tante clásica, diversas habitacio- 
nes comunicadas entre sí en las 
que hay distintos tipos de enemi- 
gos. Estos disminuirán nuestra 
energía hasta hacernos coger bue- 
паз pataletas, o, a la tercera de 65- 
tas, finalizar el juego. Para recupe- 
rarnos de esto debemos comer to- 
das las aolosinas que encontre- 
mos. 

Algunas habitaciones toman la 
forma de pequeños juegos de ar- 
cade. Esta estrategia, cada vez 
más utilizada en programas de 
este tipo, es muy de agradecer, 
pues сопа el ritmo del juego y lo 
hace mucho más entretenido, 

Diseminados por las habitacio- 
nes hay objetos que nos resultarán 
útiles para fines concretos, Por 
ejemplo, la raqueta sirve para ju- 
gar al tenis, la bomba para destruir 
los edificios. y la llave para abrir la 
caja sorpresa y, aprovechando el 
impulso que ésta nos da, subir a 


los estantes de más arriba. Para 
coger los objetos (máximo dos). 
basta con pasar sobre ellos, auto- 
máticamente se toma el que había 
y se deja el penúltimo que со- 
бітов. 

Hay cuatro plantas distintas. 
Para cambiar de planta podemos 
elegir entre hacerlo por las escale- 
ras o usar el ascensor, Si elegimos 
este medio hay que tener mucho 
cuidado de que el ascensor se en- 
cuentre en la planta en que esta- 
mos, pues si по саепатоз por el 
hueco. Aunque disponemos de un 
paracaídas para estos casos, no 
es conveniente abusar, pues se 
pierde bastante energía en las cal- 
das. 

Los gráficos del juego son muy 
variados y bastante cuidados. Las 
habitaciones están llenas de obje- 
tos, diferentes en cada una de 
ellas, y los personajes también son 
variados. El movimiento es bueno, 
aunque en los diversos enemigos 
excesivamente automatizado. La 
presentación general más que 
aceptable, siguiendo la tónica a 
que nos tiene acostumbrados Mi- 
cro-Gen. 


3335235 


ADICCION: AAAAAAA 
PRESENTACION: AAA ^ ^AAA 
GRAFICOS: AAAAAAAA 
ACCION: АЛАЛАЛА 
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05 encontramos en esta 
ocasión con un programa 
que, sín salirse de la ca- 


tegoría de los arcades y Programa: RAID!!! 
juegos de acción, aporta nuevos Tipo: juego 
planteamientos para este tipo de jue- Distribuidor: Erbe 
gos. Normalmente los programado- Formalo: cassette 


res crean una serie de rutinas de mo- 
vimiento y una estructura, más o me- 
nos complicada, que se repite a me- 
dida que se desarrolla el juego. Рив- 
den cambiar escenarios, dificultad o 
las características de los enemigos, 
pero normalmente la estructura g 
neral permanece de principio a fin. NT IRMAT IDN : 
En el caso que nos ocupa, según INCH SITE 
avanzamos en al juego, опсотга- mi RÉT 
mos una serie de pantallas, que, 
aunque unidas por una línea argu- 
mental y de gráficos bastante conti- 
пиада, parece que fueran de progra- 
mas distintos, 

Nuestro objetivo: destrulr las ba- 
ses soviéticas de lanzamiento de mi- 
siles para así salvar al mundo (en- 
liéndase EE.UU.) de un desastre nu- 
clear. Toda una misión suicida, hay 
que cruzar el espacio aéreo ruso, 
destruir las bases antes que los mi- 
siles de éstas hagan explosión, y, ya 
que estamos, atacar el Centro de 
Defensa en el mismo Moscú y des- 
truir su reactor nuclear. Para hacer 
todo esto hay que pasar por muchas 
fases distintas. 


El cuartel general del 
SAC 


Comenzamos con una vista del ra- 
dar del SAC (Cuartel General de la 
Ayiación Estratégica USA). Con él 
tendremos una visión panorámica 
del hemisferio septentrional, en don- 
de se pueden distinguir claramente 
Europa, EE.UU., la posición de na- 
ves y misiles, y la situación en que 
se encuentran las bases rusas y 
americanas. También podremos ver, 
flotando sobre la Tierra, la estación 
espacial, equipada con todo un es- 
cuadrón de cazabombarderos 
Stealth. Un marcador en la parte in- 
ferior de la pantalla nos indicará el 
tiempo que queda antes de que los 
misiles enemigos llegen a su desti- 
no; este dato puede sernos de gran 
utilidad, como veremos más ade- 
lante. 

Cuando detectemos un lanza- 
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ADICCION: ANAAAAA 
ОЕ ATA 
ТАП: AAAAAAAAA 
GRAFICOS: ANAAAAA 
| ACCION: АЛАААААА 


VELOCITY Ms za с 
AS 
IPRCT : BB: AS :GtG 


| DISPONIBLE PARA ZX SPECTRUM 
AMSTRAD 
е 


3 
3 
à 
< 
b 
E 
È 
8 


س 


LIBROS EN CASTELLANO 
PARA TU AMSTRAD 


Manual de Referencio Bosic 
pora el Progromador 

La más autorizada y completa 
guía paro programar en 
Locomotive Basic. 

3400.— Pts. 


CODIGO MAQUINA 
PARA 


PRINCIPIANTES 
CON AMSTRAD 


Código máquina pora 
principiontes con AMSTRAD 
(ова! pora iniciarse en el código 
máquina del 780 y en el 
sistema operativo de! AMSTRAD. 
2.100.— Pts. 


Tecnicas de 


Técnicas de Programación de 
Gráficos en el AMSTRAD 

Este libro enseña а aprovechar 
los excelentes funciones 
gráficas del AMSTRAD, con 
múltiples ejemplos. 

1.950,— Pts. 


PROGRAMANDO 


Programando con AMSTRAD 


Juegos Sensacionales para 
AMSTRAD d 
Fundamental рога el usuario 


Listados completos de 27 


estupendos Juegos de muy principiante 
diversos estilos, Жр y до бе ejemplos: 
Eus 


1.850.— Pts. 2 


Música б 
ySonidos эту 
соп 
Amstrad _ 


Hacia la Inteligencia Artificial 
con AMSTRAD 

Сопмепа su AMSTRAD en un 
compañero inteligente 
1.500.— Pts. 


Música y Sonidos con 
AMSTRAD 

Programe música y electos 
sonoros y convierta su 


AMSTRAD en un sintetizador. 
1.200.— PIS. 


` STRAD © AMSTRAD 


sb СРС:464 СРС:464 
Curso Autodidáctico de Basic 1 y II 

Un comploto y ostructurado Curso do Basic apoyado соп numarosos 
ejemplos y acompañado de cossenes, 


2.900.— Pts.cado volumen 


AMSTRAD 


СРС-464 


40 Juegos Educorivos 
Listados completos 
(malemóticas, geografía, 
música, atc) para aprender 
diviriéndose. 

1.950.— Pts. 


PROGRAMACION 


BASIC 
CON AMSTRAD 


Programación de 8: 
AMSTRAD. 
Imprescindible para el 
principiante y eficaz 
herramienta para el 


ргодгатабог avanzado. 
2.100.— Pts. 


indescamp 


Avd. del Mediterráneo, 9 
тей. 433 45 48 — 433 48 76 
28007 MADRID 


Delegación en Cataluña: 
C/. Tarragona, 110 — Tell. 325 1058 
08015 BARCELONA 


DE VENTA EN EL CORTE INGLES. 
Y TIENDAS ESPECIALIZADAS 


© Norca Registrado por el Grupo incescano | 


TELLA 


тє (Л) 


ТЕГІН 
г ПЛ 
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FRONTON 


STE es un programa muy sencillo aunque no por ello deja 
de ser entretenido. El jugador controla la raqueta me- 
diante las teclas del cursor y debe destruir todos los blo- 
ques que se encuentran en la parte superior de la pan- 

talla golpeándolos con la pelota. Comenzamos el juego con cinco 
pena que iremos perdiendo cada vez que no logremos golpear- 
la con la raqueta. Aun siendo un programa muy simple la dificul- 
tad del juego es bastante elevada siendo muy difícil concluir una 
partida con éxito. 


10 REM RR FRONTON RRA 

20 REM КИ AMSTRAD USER 1504 КЖУЖЖ 

20 REM уж АХ КАР RAE 

49 REM 

50 BORDER t: IM СІМК 2.24: 18K 2,6 

20 SPEED KE 

7C ENV nOOIEMT 1,10,2,2 

EM pw 

96 ENV 2,5,2, 2 m ,2,8)5,-2,1,2, 11, 3,2, -4, 8 

100 MODE £ 

119 MOVE ТО $ A СЕ 

120 РЕМ 3:LOCATE 7,I1PRIN П0%(24,142) ТРЕМ ZILOCATE 2,2:FRINT STRING:34,14 
EM 1:ЕОЯ г=5 72 г PRINT STRINGA(TS, 18 

3): нЕ: 


THEN 150 
comienz 
PRINT" EAL" ® 


in п THEN ха=-ха 
199 


yi-yya:REM comienzo te] bucle prinsipal 

3 DR x1=28 THEN ха 

300 

24 AMD 5128544 AND 5115448 TREN, UNI 120,44,6,7,1,1а: 


СОС КЕРСК САРЫ аеру ETE а--і THEN sarxalar 
dal 

286 IF vi THEN LOCATE ;,,:nRINT" 

290 GOSUE 1 


1=,1+/2:G0SUB 


" "tLüCA-E x!,71:tPRIMY снкеса 
4-98 THEN SC 
del buel 


'"POSCPILOTATE 16,25:РКІМТ" 
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OTHELO 


STE interesante juego no es muy conocido en España. Se 
desarrolla en un tablero similar al del ajedrez, consiste 
en capturar entre dos fichas propias el mayor número 
posible de fichas del contraria volviéndose entonces de 

nuestro color. Podemos elegir el color de nuestras fichas (blan- 
cas о negras), teniendo en cuenta que las fichas negras siempre 
mueven primero. Para realizar las jugadas debemos introducir la 
fila y la columna a donde deseamos movernos. Los movimientos 
ilegales son rechazados con un mensaje de advertencia debiendo 
repetir la jugada. Gana el jugador que tenga más fichas al final del 
juego. El programa es bastante bueno, con un nivel de juego alto, 
lo que garantiza muchas horas de dura competencia. Solamente 
se echa en falta una opción que permita dosificar el nivel de juego 
y la posibilidad de juego contra otra persona. 


10 
20 
30 
30 
зо 
40 
70 


REM XXX OTHELO FOR  M.J.GRIEEI ЖҚ 
REM ЖКХ AMSTRAD USER 1985 XXX 
FEN 

BORDER 14 

CLEAR 

MODE Ї:РЕМ 0: РАРЕР 1:С15 

INK O,O:INK 1,144: тмк 2,18; INK 3,26 


80 LOCATE 2, 7: РЕМ 3:PRINT"O":LOCATE 3,4:FRIMT"T":LOCATE 4, 5: PRINT"H":LOCATE 5,6: 


PRI 


NTE" 


90 LOCATE &.^:PRINT"L':LOCATE 7,8:PRINT*O"* 


100 
116 
128 
130 
140 
130 
160 
170 
180 
190 
200 
210 
220 
230 
240 
250 
250 
270 
280 
290 
300 
310 
329 
320 
340 
350 
340 
370 
390 
390 
400 
410 
420 
430 
440 
450 
460 
370 
950 
490 
500 
510 
520 
530 
540 
550 
S40 
570 
580 


WINDOW R1, 2, 39,22, 25:PAFER А1, 1; РЕМ B1,0:CLS Al 
FEN O 
LOCATE Ai,l13,1:PRIMT R1," LAS NEGRAS SIEMPRE JUEGAN PRIMERO" 
LOCATE R1,1,3:PRINT R1, "PULSE М O B РАКА ELEGIR NEGRO O BLANCO" 
B&-INKEY&:IF Bé="" THEN 140 
В" OR EB$-'b^ THEN @З-5;Н4%=О0;@ОТО 212 
М" OR EBéz'n" THEM 04ябіМ бота 210 
CLS MIFLOCATE h1,4,3 
PRINT Mi," ZOLO BLANCAS O NEGRAS" 
FOR Т-П TO 1000: МЕХТ T 
сота 140 
DIM С%(19,10),Р%(9,9),С1%18),С2%(8),СХ219),СҮ2(9) 
11%=2:21%=2:12%=7:12% 
FOR 1%-0 то 7 
С%(1%,0%)=6;С%!0,1%)=& 
CRIS, IN) - 6: CH CIN, 91-6 
МЕХТ 1% 
FOR тие: тва 
READ С1%(1%),С2%(1%) 
FOR 1%= 1 TO в 
READ P%(1%, 3%) 
©%(1%,1%)=5 
NEXT J;NEXT I% 
C513,3)23:C4(3,5] 20: C4 (3, 3 5,81 
FOR k%=1 TO 58 
READ AR", BRA, CR, DR% 
PLOT АБЗ, ВЕК: DRAW СЕМ, ОК, O 
NEXT К 
SOSUB 1460 
те Q%4=3 GOTO 770 
съв АІ ІМРШТ Һ1,4 А GUE FILA MUEVES";E% 
IF ЕХ 41 OR EX >а GOTO 400 
LOCATE Al. 1, 5: INPUT R1." А QUE COLUMNA " 
IF D% <1 ок 0% 28 GOTO 420 
IF СУ(0%,Е%) =6 GOTO 480 
CLS Mi:LOCATE P1,S,2:FRIHT АІ," ESTA POSICION ESTA OCUPADA !" 
FOR TO 1009; МЕХТ T 
бото 400 
PLOT Z7O0*(3OKDA),70T (SORE) : DRAW 2901 (ORDA) , 6? r (SORE) „8% 
PLOT 290+ (3004) , 70+ (ЗОЖЕМ) :DRAW 270+ (3OXD*. , 89+ (30¥E%) , 0% 
GOTO 540 
FOR мие 0 TO 19 STEP 2:PLOT 270+(304D%),70+10%+(30XE%) 
DRAW 290%120%0%),70%8%%130ЖЕ%),8:МЕХТ M% 
вото 400 
VRX%=0 
FOR кӛзі TO 8 
увито: CI%=D%: C4 
С3%-02%%С1%(К%):С4%-С4%%С2%(К7) 
IF си(сзъ, си) ями GOTO 590 ELSE 600 
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UR%=UR%+1:GOTO 570 

IF CX(C3*4,C4X)-6 GOTO 610 ELSE 620 

NEXT K%:GOTO 670 

IF VRM-0 GOTO 410 ELSE 630 

укказукхъ+уки 

CIARCAR CAR) ! Cas CASL- CPH (ка) 

IF CW(C3*,C4X)-6 GOTO 610 ELSE 660 
CX(UC3, C4) 585: GOTO 640 

1Е VRX%=0 GOTO 680 ELSE 710 

CLS A1:PRINT R1," ESA JUGADA NO ES VALIDA" 
FOR Tei TO 1000:NEXT T 

GOTO 510 
ЕЗЕЕЖ: DADA: VRX'EVRX 

CLS А1:РЕЇМТ R1,'HAS MOVIDO А LA FILA NUMERO *¡E% 
PRINT A1,” Y А LA COLUNNA NUMERO *;D% 
LOCATE A1,2,9;PRINT Ai, "ESTO TE DA "jVRX^;" CUADRO (8) " 
Се ПК, ЕФ) кви: GOSUB. 1710 

GOSUB 1460 
CLS А1:ГОСАТЕ R1,10,2:PRINT А1, "ESTE ES MI TURNO.. 
P520: URX%=0: VRY%=0 

IF 1128181 AND I2%¥J2%=64 GOTO 860 

FOR K%=2 TO 7 

IF CX(2,KX) <) 6 THEN 11%=1 

IF С%(7,К%) <) 6 THEN 12%=8 

IF CX(K%,2) <> е THEN 11%-1 

IF CX(KX,7) <3 6 THEN J2%=8 
NEXT КЪ 

FOR 1%511% TO 12% 
FOR J%=J1% ТО 12% 

IF С%(1%,2%)е6 GOTO 1030 
NEXT 7%:МЕХТ IX 

IF P% > 0 GOTO 1000 

IF PAS%=1 GOTO 920 ELSE 940 

CLS М1:РКІМТ Al,” BLOQUEADO ! YO DEEO FINALIZAR" 
FOR T=1 TO 1000:NEXT T:GOTO 1550 

CLS AL:LOCATE R1,19,2:PRIMT АІ, "І MUST PASS" 
GOSUB 2720 

IF PAS'"-1 GOTO 970 ELSE 990 
CLS R1:PRINT А1, "BLOQUEADO ! YO DEBO FINALIZAR." 
FOR T=1 TO 1000:МЕХТ T:GOTO 1550 
GOTO 400 

IF LC%=0 THEN LC%=1; RANDOMIZE LC%:RL%=RND(LC%) 
CXIM=CX% (RL) :сх2%=сү% (RLY) 

вото 1220 

укхъзо 

FOR K%=1 TO 8 

уЖх-0:С5%е1%:С4%-7% 

C3NeC3 CIS (КУ): CASLECA'SHCZAL UE) 

IF С%(С5%,С4%)-Ә% GOTO 1060 ELSE 1090 
URY=UR%+1:GOTO 1060 

IF С%(С2%,С4%)-6 GOTO 1100 ELSE 1110 

NEXT КУ: GOTO 1120 

IF VR%=0% GOTO 1100 ELSE 1120 
URXA%=URX%+UR%: GOTO 1100 

IF VRX*zO GOTO 890 

IF PA(IW,JA4) € P% GOTO 690 

IF Р%(1%,1%) > P% GOTO 1160 ELSE 1170 

РҳаР CIN, 3%) 3 VRYA=URX%: LO%=0:CXA(0)=1%3CY%(0)=J%:G0TO 690 
IF VRY% > VRX% GOTO 890 

IF VRY% < VRX% GOTO 1190 ELSE 1200 

LC%=0: URYA-VRXA: CX (0) 214: CY% (O) 774: GOTO 890 
LCA=LC%+ 1: CX (LCN) =19: CY (16%) =J% 


GOTO 890 
Сх2%аСХ2%:СсХ1%- 
CLS A y" YO ELIJO LA LINEA NUMERO "j CX2% 
PRINT Ai, Y LA COLUMNA NUMERO *¡C0xX1% 
LOCATE R1,1,4:PRINT R1,"ESTO ME DA ";VRYX;" CUADRO(S)" 
PLOT 270*(3OKCX1X) ,7O* (30%CX2%) : DRAW 290%(50%СХ1%),89%(20%СХ2%),М% 
PLOT 290*(GOXCH1U),20! (SOXCX2&) : DRAW 270 « (ZOXCK1&) „Во: (3OKCH2N) , NY 
FOR T=! TO 1000:NEXT Т 
FOR к%-! TO в 
УЕйа0:2С3%-СХ1%:С4%-СХ2% 
С3%-С5%%С1%(К%):04Х-С4%%С2%1(К%) 
IF С%(С5%,С4%1-8% GOTO 1330 ELSE 1540 
VRX-VRA*1:GOTO 1310 
IF С%(С3%,С4%)-8 GOTO 1350 ELSE 1360 
NEXT K%:GOTO 1400 
IF VR%=0 GOTO 1550 
СЗ%=С3%-С1%(К%):С4%=С4%-С2%(К%) 
IF OM(03%,04%)=6 GOTO 1350 
CX(CI%,C4%)=N%:GOTO 1370 
С%®(Сх1%,СХ2%)=М% 
GOSUB 2720 
GOSUB 1460 
GOTO 1440 ELSE 1450 
RINT R1," DEBES PASAR":FOR T=1 TO 1000:NEXT T:GOTO 770 


FOR М%=0 TO 19 STEP 2 

ZW-270* (IORI) : H&-20* (OR IM) 2 DATA ма 
PLOT 25, Wh: DRAW Z4+20,W%,C%/1%, ТА) 
NEXT М%:МЕХТ 14: МЕХТ 1% 

х®=х®%+1 

IF Х%=61 GOTO 1550 

RETURN 

CQX20:CNX-0 


IF CA(1%,J3%)=Q% THEN CQ%=CQ%+1 

IF CW(I 4, J%)=N% THEN CN%ECN%+1 

NEXT 74: МЕХТ I% 

IF CO% > CN% GOTO 1680 

IF СӨ М% GOTO 1620 ELSE 1450 

CLS Мі: ОСАТЕ Һ1,25,2:РКІМТ Ri, "BLOQUEADO* 

END 

CLS Ri:LOCATE R1,5,1:PRINT R1, "LLEVAS “;С0%;" CUADROS;YO LLEVO *;СМ% 
LOCATE R1,10,3:PRINT АІ, "НЕ GANADO... 

END 

CLS Һ1:10САТЕ Ri,5,1:PRINT АІ, "LLEVAS “)С68%;" CUADROS;" YO LLEVO “¿CNA 
LOCATE R1,5,3:PRINT А1, "BRAVO, HAS GANADO !!" 

END 

IF C%(2,2)=0% AMD (0% (3,1)=N% OR C%(1,3)=M%) GOTO 1720 ELSE 1730 
PRO, я: РА (1, 3) #1 

IF СҰ(2,2)-6% AND (C%(8,6)=N% OR C%(6,8)=N%) GOTO 1740 ELSE 1750 
PA(8,61=1:PA4(6,8)=1 

IF C%(2,7)=0% AND (CW(1,6)-N* OR C4(3,8)=N%) GOTO 1760 ELSE 1220 
PX 6) -1: РИ (3,8)-1 

IF С%(7,2 I% AND 1C0%(6,1)=N% UR C%4(8,5)=N%) 6010 1780 ELSE 1/90 
Р%(&,1)=1:Р%(8,3)=1 

IF D%=1 OR П%-8 OR E*-1 OR Е%-8 GOTO 1820 

IF CX1%=1 OR CX1%=8 OR CX2%=1 OR СХ2%-8 GOTO 1820 

RETURN 

FOR 1%=! то а STEP 7 
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FOR I%=2 TO 7 
IF С%(1%,1%1-М% GOTO 1850 ELSE 
Р%(1%+1,1%)=21;Р%(1%-1,1%)=21 
IF С%11%,1%1-Ы% GOTO 1870 ELSE 
PAIR, 14+1)=21:PX(J%, 1%-1)=21 
NEXT 1% 
FOR 1%=2 TO 7 
IF С%(1%,24)-0% GOTO 1910 ELSE 
Р5115%1,1%)-2:Р%(1%-1,7%)-2 
IF С%12%,19)-8% GOTO 1930 ELSE 
Р%(1%,1%+1)=2:Р®%(2%,1%-1)=2 
МЕХТ 1%:МЕХТ 1% 
%(1,21-1:Р%(2,1131 
PR(2,8) %(7,8)=1! 
FOR I%=2 TO 7 
IF C%(1,1%-1)=0% AND С%(1,1%%1)-6% THEN Р%(1,1% 
IF С®%(8,1%-1 C418,1%+1)=0% THEN Рика, I% 
IF С%(1%-1,1 састита, 12-85 THEM PX 1)— 
IF С%(14-1,8 C%(1%+1,8)=0% THEM P%(1%,8)= 
NEXT 1% 
FOR Ј%=1 TO 8 STEP 7 
FOR 1:54 TO в 
IF С%(1%,1%) <> № GOTO 2146 
ICW2IW-1:IF CA(JA,1IC%)=6 GOTO 2140 
IF CA(IA, 10%) =9% GOTO 2080 ELSE 2090 
тсуетси-1: вото 2070 
IF С%(1%,1С%)-6 GOTO 2110 
GOTO 2140 
IF ІС%-О GOTO Z140 
IF С%(7%,1%%1)-0% AMD С%(1%,1С%-1)-е GOTO 2190 
Р%11%,1С%2-26 
IF С%(1%,1%) (> ми GOTO 2220 
ICW-IX-1:IF CA(ICA,J%)=6 GOTO 2250 
IF С%(1С%.1%)=9% GOTO 2170 ELSE 2180 
ІС%г1С%-1:60Т0 2160 
IF С%(1С%,2%)-6 GOTO 2200 
сото 2230 
IF 1С%=0 GOTO 2230 
IF С%(1%+1,71%)=@% AND CU(1IC%-1,3%)=5 GOTO 
PA(ICA,IMI=ZÓ 
NEXT 1% 
FOR 1851 TO 5 
IF сак, 1%) <> N% GOTO 2340 
16%=1%+1:1Е С%(1%,1С%)=в GOTO 2340 
IF С%(1%.1С%2-8% GOTO 2280 ELSE 2290 
ICA=1C%+1:G0TO 2270 
IF С%11%,1С%!<6 GOTO 2310 
GOTO 2340 
ТЕ ІС%-? GOTO 2340 
IF С%(1%,1%-1)-0% AND С%(1%,1С%%11-6 GOTO 2240 
PRIJA, ICR)-ZÓ 
IF съ(ти, 14) ¢> NY GOTO 2430 
ICA=I4+131F С%(1С%,7%)-6 GOTO 2420 
IF систси, та) еи GOTO 2370 ELSE 2780 
ICA=ICA+1:GOTO 2360 
IF С%11С%,1%!-6 GOTO 2400 
GOTO 2430 
IF 10%=9 GOTO 2430 
IF СУ(1%-1,1%)-0% AND CHLICA+1,3%)=6 GOTD 2420 
Р%(12%,1%1<26 
NEXT IAINEXT ТИ 
IF С%(1,11-М% GOTO 2450 ELSE 2490 
FOR 1%=2 ТО 6:РИ(1, 1%) 20: PHI, 1:20: МЕХТ I% 
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2460 IF C%(1.8)=N% GOTO 2470 ELSE 2430 
2470 FOR I%=2 TO 6:Р%11%,8)-20:Р%(1,9-І1%)-20:НЕХТ 1% 
2480 IF C%(8,1)=N% GOTO 2490 ELSE 2500 
2490 FOR 1%=2 TO 6:Р%19-1%,1)-20:Р%18,1%) =20:МЕХТ 1% 
2500 IF С%(8,8)-М% GOTO 2510 ELSE 2520 
2510 FOR I%=3 TO 7:Р%(1%,8)-20:Р%(8,1%)-20:МЕХТ I% 
2520 IF С%%1,1) ХУ é THEN FA(2,2)-5 
2530 IF C%(1,8) <> 6 THEN P4(2,7)=5 
2540 IF С%(8,1) <> 6 THEN Р%(7,2)-5 
2550 IF С%(8,8) (> 6 THEN Р%{7,7}=5 
2560 Ph(1, 1) -20:PX (1,61 9 30: F4 L0, 1) -30: PO, 21-20 
2570 FOR 1%-5 10 6 
2580 IF С%(1,1%)-М% THEN Р%52,1%)-4 
2590 IF 5%/8,1%)-М% THEN PA(7,1%)=4 
2400 IF С4(1%,12-М% THEN РУ(1%,23-4 
2810 IF С%(1%,8)-М% THEN РА(1%,7)-4 
2620 NEXT 1% 
2820 IF 0%(7,4)=0% AND С%(4,1)-М% AND C%1ó6,1)=% AND С%(5,1)-6 THEN PAS, 1)=26 
2640 IF C%4(1,7)=0% AND С%(1,4)=М% AND С%(1,4)-а AND С%11,5)-4 THEN Р%11,4)-26 
2650 IF C%(2,1)=0% AND C%(5,1)=M% AND C%(3,4 AND C%14,1)=4 THEN 
2660 IF C%(1,2)=G% AND С%(1,52-М% AND C%(1,3)=6 AND С%(1,4)-4 THEN 
2670 IF C%(8,2)=0% AND С%(8,51-М% AND C%(5,3)=6 AND C%(8,9)=6 THEN 
2580 IF С%(2,8)-6% AND AND C%(3,2)=é AND C%14,8)=á THEN 
2690 IF С%(8,7)-0% AND AMD С%(8,5)-4 AND C%(8,6)=é THEN 
2700 IF C%(?,8)=0% AND С%(4,82-М% AND C%(5,8)=6 AND C%(6,8)=6 THEN 
2710 RETURN 
2720 Ра5%-0 
2730 FOR 1%=1 та в 
2740 FOR 1%-і TO € 
2750 IF 0%(1%,J3%)=0% GOTO 2780 
2280 NEXT 2%:МЕХТ 1% 
2770 PAS#=1 RETURN 
2780 FOR K%=1 TO в 
2790 УЕ%-0:С2%51%:С4% 
2860 С3%-С3%%С1%(К%):С4%-С4%%С2%(КУ2 
2810 IF C3% < 1 OR С5% 2 8 GOTO 2820 ELSE 2630 
2820 NEXT K%:GOTO 2760 
2830 IF C4% < 1 OR С4% > 8 GOTO 2820 ELSE 2840 
2840 IF С%1С5%,С4%) -М% GOTO 2850 ELSE 2860 
забо URY=VR%+1100TO 2000 
2860 IF С%1С3%,С4%)-0% GOTO 2820 ELSE 2370 
2870 IF UR% > O THEN RETURN 
2880 GOTO 2820 
2890 DATA 1,0,30,1,20,10,10,20, 
2900 DATA 3,3,3,1,1,0,1,20,3,5, 20, -1,1,10,3,5 
2910 DATA 0,0,5,3,10,-1,0,10,3, 3, 10, 71 
2920 DATA -1,20,2,5,5,5,5,2,2 11,2,2,3,3,1,1,1,71,30,1,20, 10,10, 20, 1,30 
2930 DATA 243, 100,263, 126, 270,17 30,255, 13G, 255, 146, 255, 140, 270,140 
2940 ? 50,255, 160, 270, 150, 270,160, 270, 190 
2950 DATA 270, 180, 255, 180, 270, 170, 255, 170, 270, 190, 270,210, 270,200, 255,200 
2950 DATA 255,200, 255,210,255, 220, 270,220, 270, 220, 270,220,270,230, 255,220 
2970 DATA 255,230, 255,245, 255,240, 270,240, 255, 250,270,250,270,250,270,260 
2936 DATA 270,240; 255,250, 255, 250, 255,270, 270, 280, 270,300, 270,290, 255, 300 
299С DATA 255,310,255,220,255,330,270,330, 276,330, 270, 310, 270,310, 255,310 
3006 DATA 255,320,270,320 - 
3010 DATA 310,385,210,275,350,255,325,255, 235, 255, 225,045, 325, 362, 350, 365 


3610 

3020 DATA 350,2345, 350, 375, 350, 375, 335,175, 145,755, 180, 355, 380, 155, 330,375 
3030 DATA 380,375, 365,375, 730, J05; 365,365, 440,555, 110,575, 410,365, 395,365 
3040 DATA 795,365, 375,375, 425,355, 140,155, 440, 155, 440, 345, 440, 355,425, 365 
3056 DATA 42 75,425,375, 440,375, 555,275, 455,355, 155,155, 470, 255 
3069 БАТА 470,355,470,3 ‚455,265, 405,375, 500,375, 500, 275, 500,355 
1670 DATA 515,375,815,255,515,355,$20,155, з255,520,225,520,225,515,375 
2080 DATA 65,520,245 
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LUCHA ELECTRICA 


blanco sobre el contrario evitando al mismo tiempo ser 

alcanzado por sus disparos. El jugador que antes logre 

acertar nueve veces sobre el contrario se proclamará 
vencedor de la lucha. El control del programa se realiza mediante 
dos joysticks o teclado para esta opción las teclas utilizadas son 
las siguientes: 


> L objetivo de este juego para dos personas es el de hacer 


JUGADOR 1 JUGADOR 2 


ARRIBA: F6 
ABAJO: F3 
DISPARO: F7 
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REM X344 LUCHA ELECTRICA 334 
REM ЖЖЖ PARA DOS JUGADORES Ж» 
REM #%#%#%#%+ AMSTRAD USER 1986 XXX 
REM 

DEFINT a-z 

MODE O 

GOSUB 1050 

GOSUB 1470 

созив 280 

GUSUB 1470 

GOSUB 1360 


REM comienzo 

TF fin THEN GOTO 100 

8050в 240 

CALL &BD19:IF nidin THEN GOSUB 580 ELSE CALL kBD19;CALL &BDi9 
CALL KBD19:1F p2dir THEN GOSUB 640 ELSE CALL ABD19:CALL &BD19 
IF pis 1 THEN GOSUB 700 

IF p2sa=-1 THEN GDSUB 760 

GOTO 140 


IF j THEN 380 ELSE 480 


CLS:PEN 6 

PRINT:PRINT" CONTROLES DEL JUEGO" 

PRINT:PRINT:PRINT:PRINT"TECLADO (T)":PRINT:PRIMT TAB (11)," O JOYSTICK (1)" 
IF NOT J THEN LOCATE 17,10:PRINT" ":LOCATE 13,7:PRINT"X"ELSE LOCATE 13,7:PRI 
"iLOCATE 17,10: FRINT"*" 

ТЕ NOT(INKEY(51)) THEN 150 

IF NOT(INKEY(95)) THEN j=-1 

ТЕ NOT(INKEY(18)) THEN RETURN ELSE 310 


p1=JOY (0) :p2=J0Y(1) 

іғ= (рі AND 1)%-1+(pL AND 2)%0.5 

p2 AND 1)%-1+(р2 AND 2)%0.5 

IF Pi AND 16 THEN pisa-pisa-1:IF plsa--1 THEN AFTER 15 GOSUB 820 
IF PZ AND 15 THEN pZsa-pzsa-i:IF р2за=-1 THEN AFTER 15 GOSUB 820 
IF pisa THEN pldi 
1F p2sa THEN p2di 
RETURN 


p2dir=((INKEY (4) #0) X12 € (ТМКЕУ (51 70) #-1) 

р1біг= ((ІМКЕҮ [69) 20) X1) + CUINKEY (21) 70) Ж-12 

IF INKEY(63)=0 THEN pisa-pisa-1:IF písa=-1 THEN AFTER 15 GOSUB 820 
IF ІМКЕҮ(10)-0 THEN p?sa-p2sa-1:IF p2sa=-1 THEN AFTER 15 GOSUB 820 
IF pisa THEN рі4іг-0 

IF pZse THEN pZdir-o 

RETURN 


pt-plup*pldir:IF pt>25 OR pt(é THEN RETURN ELSE рінр=ре 
pidir=0 
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PEN 1:LOCATE Z,piuptCLS PRINT CHR$(209)5:RETURM 


pt=p2Wp+p2dir:IF р%225 OR ptté THEN RETURN ELSE р2ир=рї 
p2dir-o 
PEN 2;LOCATE 18,p2Wp:CLS 85: РВІМТ CHRS$(211);:RETURN 


PAPER 84,4:UINDOU 84,4,17, plup,plup:CLS8A:CALL &BDIS:CALL 8119 
PAPER 84,0:CLSH4 
GOTO 580 


PAPER Hé, 5i WINDOW 46,4,17,p2up,p2Hp:CLSH6: CALL &BDIG:CALL &BD19 
PAPER H6,0:CLSH6 
сото 840 


pupe=(piwp=p2Wp):1F pisa AND NOT(p2sa) AND рире THEN pisc=pisc+1:SOUND 132,1 
20,10,0,1,0:PRINTMi,a&(pisc)]!IF pisces? THEN 920 
830 IF p25a AND NOT(pisa) AND pepe THEN p2sc=p2sc+1:SOUND 132, 100, 10,0, 1,0: PRINT 
#2, а (р25с);:1Е p2sc-9 THEN 920 
840 IF pisa THEN SOUND 152,49,70,0,1,1 
850 IF p2sa THEN SOUND 152,54,20,0,1,1 
860 plsa=0 
870 p2sa=0 
880 RETURN 
890 ' 

700 * 

910 ° 

920 PEN 6 

930 LOCATE 5,10:PRINT*FINAL PARTIDA" 
940 IF різс-9 THEN INK 1,2,20:INK 2,0 ELSE INK 2,4,17:1МК 1,0 
730 SOUND 127,1000,0,12, 5: SOUND 130,900,0,12,3 
9&0 WHILE INKEYS( >"; WEND 

970 t!=TIME:WHILE t!+20002TIME: WEND 
980 WHILE INKEYS-"":WEND 

990 CLS 

1000 fin=-1 

1010 RETURN 

1020 ' 

1030 

1040 

1050 11101101101111" 

1060 a*(1)2"011001001001001" 

1070 a&12)-"111001111100111" 

1080 а%( 3) ="111001111001111" 

1090 as(4)="100100101111001" 

1100 а$ (5) ="111100111001111" 

1110 а$ (6) ="111100111101111" 

1120 а%(7) ="111001001010010" 

1150 а (8) ="111101111101111" 

1140 añ (9)="111 101411001001" 

1150 FOR n=0 TO 9 

1160 по ЕМ(а(и)) 

1170 FOR п2=1 TO по 


1180 IF MID$iaf(n),n2,1)2"1*THEN MIDS(a$(n),n2,1)=CHR$(143)ELSE МІрФ(аФіп),п2 
, 11 -CHRS (32) 

1190 NEXT n2,n 

1200 ” 

1210 ° 

1220 b$-'LUCHA ELECTRICA" 

1230 c&-CHR&(32) «CHR&(154)*" Alexander Martin" 

1240 ЕМУ 1, =9,2000:ЕМТ -1,6,3,1 

1250 ЕМУ 2,127,0,0,127,0,0,127,0,0,127,0,0,127,0,0 

1260 ENV 3,=9, 9000 

1270 * 

1280 > 

1290 > 

1300 BORDER O 

1310 PEN 84.1:PEN H6,2:PEN Hi. 
1320 RETURN 

1330 * 

1340 > 

1350 * 

1860 INK 0,12: МК 1,2:INK 2,6: 1NK 3,13: INK 4,20% INK 5,17: INK 6,20 
1370 WINDOW H3,3,3,6,25: WINDOW #5, 18, 18, 6,25 

1380 WINDOW HL, 3, 5,1, S:WINDOW 82,15,18,1,9: WINDOW H7,1,20,1,5:PAPER #7,3 
1390 CLS:CLSHZ:PRINTHI1,a$(0) ;: PRINTHZ, a&(0) ;:р1зс=0:р25с=0:ріир=5:р2ир=24:ріїіг= 
itp2di 

1400 GOSUB 530:G0SUB 640 

1410 SOUND 1,1000,0,12,2:500№0 2,900,0.12.2 
| 1420 pisa=0:p2sa=0: fin=0 

1430 RETURN 
|1440" 

1450 > 

1460 ' 

1470 CLS 
|1480 PEN 7 

1490 FOR n=1 TO LEN(b$) 

1500 LOCATE 2+п,10 

1510 FOR n2=LEN(b$) TO n STEP-4 

1520 PRINT MIDS(b$,n2.1) 

1530 LOCATE 2+һ,10 

1540 SOUND 138,20*n2,5,12,2,1 

1550 NEXT n2,n 

1560 SOUND 135,100,0,13,3,1,20 

1570 PEN 6:PRINT:PRINTIPRINT:PRINT св 

|1500 t'-TIME: WHILE 6: +2500>ТІМЕ; WEND 

1590 RETURN 


¡PEN #2, 2:PAPER H1,3:PAPER H2,3:PEN #0,6 
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sta es la familia de ordenadores 

personales AMSTRAD, Una 

familia completa en la que se 
incluye desde el equipo básico de 
introducción a la informática hasta el 
orientado a aplicaciones 
profesionales, Todo con la filosofía de 
diseño AMSTRAD que ofrece 
ordenadores compactos, listos para 
funcionar sin cableados engorrosos ni 
necesidad de adquirir periféricos 
-con un solo cable а la red- 
e incluyendo paquetes de programas 
de obsequio, 
Todos con una tecnología 
contrastada y fiable basada en el 
microprocesador 7. 80 A, en el 
Sistema Operativo CP/M - el más 
extendido para ordenadores de 8 
bits- y en una electrónica depurada y 
con un riguroso control de calidad. 


ORDENADOR 


Todos con una extensa biblioteca de 
programas que se incrementa día a 
día con títulos para todos los gustos y 
necesidades, 

Todos con una asistencia técnica 
rápida y eficaz que AMSTRAD 
ESPAÑA garantiza exclusivamente а 
los equipos adquiridos a través de su 
Red Oficial de Distribuidores y 
acompañados de la Tarjeta de 
Garantía de AMSTRAD ESPAÑA. 
Todos a unos precios increibles que 
no admiten comparación con los de 
cualquier otro ordenador personal de 
sus características y prestaciones. 


AMSTRA PC 


е Microprocesador 7 80 Ae 64K 

RAMe 32K ҚОМ» Teclado profesiona 

con 32 teclas programables. Sonido 

estéreo con 3 canales y 8 octavas. 

Resolución de hasta 640 x 200 puntos. 

Texto de 20, 40 y 80 columnas. 

21 colores. Conectores multiuso, 

Centronics, joystick etc.. Magnetófono 

incorporado. 

TODO POR: 59.000 pts. (monitor verde) 

90.000 pts, (monitor color) 

EL SUMINISTRO INCLUYE: 

* LIBRO "Guía de Referencia del 
Programador" 

* Manual en castellano 

* 8 programas de obsequio en cassette 
("Animal, Vegetal y Mineral", 
"Amsdraw”, "Plaga Galáctica”, "Fruit 

y Machine”, "Admiral Graph Spee", 
"Amsword", "El Laberinto del Sultán” 
"OH. Mummy") 


) PCW - 8256 


AMSTRAD CPC-6128 


5 AMSTRAD, 


* Microprocesador 2 80 Ае 128 К ҺАМ» 

48K ROM (con BASIC Y AMSDOS) e 

Teclado profesional de 74 teclas 

(82 programables). Sonido estéreo con 3 

canales y 8 octavas. Resolución de hasta 

640 x 200 puntos. Texto de 20, 40 y 80 

columnas, 27 colores. Conectores 

multiuso, Centronics, Joystick, etc... 

Unidad de disco (3", 180K por cara) 

incorporados. 

TODO POR: $9.900 pis. (monitor verde) 
121,900 pts. (monitor color) 

EL SUMINISTRO INCLUYE: 

* Disco con Sistema Operativo CP/M 2.2 

y lenguaje DR, 1060 
е Disco con Sistema Operativo CP/M 
Plus y Utilidades, 

* Manual en castellano 

4 Disco con 6 programas do obsoquio 

("Base de Datos", "Proceso de Textos Г. 


“Random Piles" "Diseñador de Gráficos”, 


"Puzzle", "Animal, Vegetal y Mineral") 


* UNIDAD CENTRAL con 

microprocesador де 7 80 A, 256K RAM 

y teclado profesional de 82 teclas 

(ñ, acento, etc..), тА DE а ч 
RESOLUCION соп ешп р y шу importane verificar la garantía del 
líneas de texto, UNIDAD DE DISCO de ural ya que sho AMSTRAD ESPAÑA puedo 
3" y 180K por cara. IMPRESORA de garantizaile la ordenada reparación y sobre lodo 


tracción/fricción con alineación materiales de repuesto oficiales (Monitor, 
automática de papel ordenador, cassetle o unidades de discos). 


TODO POR: 129.900 різ. 


EL SUMINISTRO INCLUYE: Procesador 
de textos LocoScript (en castellano). 


Sistema operativo CP/M Plus. Mallard n ст 
BASIC con sistema JETSAM (ficheros и Д E | В li 
indexados). Lenguaje DR. LOGO. -- Lu i 


Manuales en castellano. 
Arda, del Mediterráneo, 9. Tels, 433 45 48 - 433 48 76. 
28097 MADRID 
Delegación Cataluña: Tarragona, 110 - Tel. 326 10 58. 
00015 BARCELONA 


41011 Sevilla - Tel. 277295 


PROGRAMAS 


PROFESIONALES 


—664-6128— 


Almacén para 1.500 artículos 10.900 Ptas 
Facturación con IVA 10.900 Ptas 
Almacén facturación integrado 12.900 Ptas 
Proveedores 10.900 Ptas 
Clientes . 10.900 Ptas 
Gráficos d 8.900 Ptas 
Video Club 1.500 pel 14.500 Ptas 


—464— 


Almacén 500 artículos 
Almacén facturación integrada 
Gráficos de Empresa .. 

Disco Demo 


* Programas para 8256 


SUSCRIBASE 
POR TELEFONO 
x más fácil, 

ж más cómodo, 

* más rápido 


Telf. (91) 73379 69 


? días por semana, 24 horas a su servicio 


SUSCRIBASE A 


TITULO Cuando se trata de presentar números y tablas, 
nada como unas buenas gráficas, que permiten 
visualizar con rapidez y sin problemas las 
tendencias de los datos. Este magnífico 
programa permite hacerlo tanto para 464 como ` 


BARRAS HORIZONTALES 


INGRESOS 


para 664 y 6128. 


mgraph es ип programa 
de gráficas de empresa 
controlado por menús 
para los Amstrad CPC. 
Se pueden introducir y presentar 
hasta cuatro conjuntos de datos 
con hasta doce elementos en cada 
conjunto. Y todo ello en cualquier 
combinación de gráficas de barras, 
línea, barras apiladas y diagramas 
de barras tridimensionales. Se in- 
cluyen también gráficas de línea, 
que se pueden utilizar para repre- 
sentar un conjunto de datos o una 
comparación de los conjuntos. En 
los dos casos se listan los porcen- 
tajes relativos y se puede resaltar 
un sector de la tarta васапдою del 
circulo principal 
Toda la introducción de datos en 
el programa se controla por rutinas 
que filtran los datos erróneos y 
mantienen una presentación 
correcta de la pantalla, La introduc- 
ción de datos se hace en una pan- 
talla diferente de la que se utiliza- 
rá para dibujar, para que el usua- 
río no pierda la pista a los datos in- 
troducidos. Se dispone también de 
opciones de carga y salvación de 
datos, así como de modificación. 
El formato ganeral admite que 
se introduzcan etiquetas para los 
datos y una opción que numera au- 
tomáticamente según los meses 
del año. Por ejemplo, una entrada 
de 5 daría como resultado los me- 
ses de mayo a abril 
Las gráficas se escalan automá- 
ticamente, aunque se puede poner 
la línea base para comparar o for- 
zar un rango de escala determina- 
до. Esto resulta muy útil para com- 
paraciones con un nivel dado. 
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El programa incluye aproxima- 
damente 700 bytes de código má- 
quina que dibuja las barras y рго- 
porciona un volcado de pantalla 
con sombras de gris para impreso- 
ras tipo Epson. La rutina funciona 
con la impresora Indescomp. 

El programa se debe salvar a 
cassette o disco antes de ejecutar- 
lo, ya que un fallo en la introduc- 
ción del código máquina puede de- 
jarlo colgado, causando la pérdida 
de nuestros datos. El programa in- 
cluye sumas de control para mini- 
mizar cste problema. 

El programa es compatible CPC 
464 y СРС 664 y 6128. Los Úsua- 


rios de estos últimos, sin embargo,” 


deben cambiar la línea 40 como 
se indica. El problema surge por- 
que el programa usa la sentencia 
FILL, no disponible en el 464. Su 
uso hace más vistosos los dibujos 
en el 664 y 6128. 

Cuando el programa ejecute 


correctamente y se corrijan los 
errores de introducción que apare- 
cerán inevitablemente, la espera 
mientras se introduce en memoria 
el código máquina se puede aoci- 
tar haciendo los siguiente: 

Salga del programa mediante 
BREAK. Cambie la línea ep a 


MEMORY 49 99: 
LOADIGRAPHEM. m NY 


Borre á etian (ав lineas 
4000-4160 y SR la/nueva ver- 
sign, con: WA 


SAVE ЗАМБОВАРН» 
SAVE «GRAPHCM»,B,35059,691 


Para continuar con el programa 
sin perder los datos teclee GOTO 
190. 


Las variables principales usadas 
por el programa son: 


— a$() vector de nombres 08 
los datos. 
tabla de datos, 
— ef): vector con las longitudes. 
„де 108 conjuntos de datos. 
“month, month$. 


vielen 

— msc: línea base para las grå- 
ficas 

— 5, 55, x$, y$. | 

Etiquetas de las gráficas 

— 8С, 5, 55: 

Factor de escala, potencia de 
diez (orden de magnitud de los dê 
tos) y si es menor que 2,5, 5 610 
usada para limitar el tamaño de los; 
nümeros en los ejes. 


— К: Se usa para introducir va- 
riables para la rutina de introduc- 
ción d$, 91. cadena de IMPUT узи. 
longitud. | 


REMUOGOOHOOHODUOPHOOHOOHROOOUOROOOOUOE: 


REMX- 


SYMBOL AFTER 22 


IPEMQUT "dummy" 


AMGRAPH por John Palmer * 
КЕЛЕКЕ 
Cpcdó4--1:REM PONER А 0 РАКА UTILIZA 


R ЕН 


MEMORY 234999:G0GUE 4000: RESTORE 
MODE 1:IMK O,O:IMK 1,26: INK 2,18; INK 3,6:BORDER O:WIMDOWH1,1,30,25,25:FAFERRI 
1WINDOUS2,1,40,24, 25: PAFERS2, S: WINDOUHA, 1,40, 24, 25 


iDEG 


80 DIM opt$(9) ,b$(5) ,a$14), d (12,4) ,e(4) :e(Q 
OR f=0 TO 4:READ bS(f)3NEXT: té="TITULO": 


s-tEJE Y" 


x$s"EJE X"iy 


UN 684 o 6128 
¿MEMORY HIMEM-1:CLOSEOUT 


z12:FDR +=0 TO 9:READ optS$ CE) :NEXT:F 


90 DATA AMGRAPH,Entrada de datos iniciales,anadir/modificar/visualizar,Formato 4 
sneral,Grafica de barra (vert),Grafico de linea, Graf 

ico de tarta,Grafico de barra (horiz),Grafico de barra 3D,Cargar/Salvar datos 
100 DATA Introduzca el nombre de los datos, Introduzca datos S=salír, Introduzca 0 
prion requerida, Introduzca numero, Introduzca nuevos 

detalles 

110 FOR 4-229 ТО 255:1Е 4=233 THEN 130 

120 READ x1,x2,»3,x4,«8, «6: SYMBOL £,0,x1,x2,x3,x9,x5,x6,0 

130 МЕХТ: РОБ f=234 ТО 288:year$eyear$iCHRE(E) : IF f=241 THEN year t=year $+CHRS (238 
) 
140 IF 4-244 THEN year$-ysart*CHR& (245) 

150 MEXT 

160 DATA 125,0,126,0,126,0,0,0,146,0,0,0,0,0,254,0,0,0, 42,42, 42, 42,42, 42, 249, 18, 
18,19,144,98,145,89,93,215,83,81, 251, 130, 243, 130, 110 
1131,222,17,222,17, 17,222, 137,218, 290,171, 138, 138, 158,81,81,222,82,81 

170 DATA 115,128,138,2251,136,128,125,81,81,126, 18, i7, 145,01,74, 176, d8, 55,250,10, 
18,18, 146, 97,81,89, 93,87,83, 145,86, 80,85, 20, £0, 159, 1 

14,138,139, 250,133, 127 ,23,81,60, 82,61, 142,123, 130, 115, 10, 138, 115, 222, 17,205, 30,1 
4,208 

180 DATA 112,128,12£,135,138,112,227,4,4, 4,4, 175, 137,202, 
Sur 468413212274 136.139. 1261 144, 227, 206, 12,208, 15,1 

190 
зод 
216 
220 


234, 136,154, 137, 145,01, 


A dd НЗОК al 

REMY Meno 

A OE E 
гоозив 2170 
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CARGAR/SALVAR 


ARGAR/SALUAR e RETORNAR? << 


Intro&uzes ei nonbre Ue IDs datos 


230 FOR #=1 TO 9:LOCATE 7,f*2:2:FRINT USING "H";4;:FRINT") 'iapte (£1 t NEXT 

240 CLSHI:PRINTHI,TAB(O):"Seleccions numero de opcion" 

250 i&-IMKEY$:IF i$z'' THEN 250 ELSE изнАЗС (1%) -48:1Р ms<1 ОК ms79 THEN 250 

| 260 IF n=0 AMD 4523 AND ms?! AND nst9 THEN CLSHI:PRINTHI,TAB(I3)"No hay datos " 
¡FOR bei TO 500: бото 240 

270 ОН ms GOTO 280,400,650, 1000, 1060,11 
| 250 REMXXXXXJXOOOOODQUD EKK EX N EEE 
290 REMK Datos iniciales * 
200 БЕМАЖЕЖУЯЗ КУАН ӨЕ ХХ 


80,1470,1570,1210 


319 CLS:IF n=0 THEN 350 
222 LOCATE 22,12: PRINT"CUIDADO":LOCATE 4.14: FRINT*SE НАН INTRODUCIDO DATOS ANTER 
IGRMENTE":LGCATE $,15:PRINT" Desea continuar  18/N)* 


1S-UPPERS (ТНКЕУВ) ТЕ 3 THEM 190 ELSE IF i$(5"S" THEN 239 
240 ERASE a$,d,e:DIM a$(4;,d(12,4) ,e(4) ie (0) =12 
SOSUR 219С:ҒОЕ £21 TO 12:10САТЕ Í,G*f:FRIMT USING "HE"LFIIFRINT")"INEXT 
ŪSUB 1950:IF 3=4 THEN 299 
370 CLSRIIFRIHTHI,"Dessa introducir algun dato mas (S/N)* 
i€-UPPER*!IMKE/€!:IT it-"$" THEN 740 E! IF ¡REINO THEM 380 
GOTG 190 
100 PENHAN ¥ RIKIN HESREN 
410 FE visualizar datos * 
ЕЙ ЕЗ ЕК EEEE 
UB Z190:GOGUB 2590:ҒОК 4-1 TO I2:LGCATE 1,9» 
n= THEN PRINT ")! ELSE PEN 2:FRINT MIDS (months, +#2- 
1,2) :РЕМ 1 
MEXT:FOR gc! TO пл: ОСАТЕ 9X9, 8: 
*(3)),7:FRINT aig) 
450 FOR 70 eta) :c&-STRS(d (f 
4&0 CLSH RIMTH2, "COMMANDOS : 
re 4=impresora" 
470 i&-UPPERS(INKEYS!!IF is-'' THEN 420 ELSE IF ї®='М" THEN 190 ELSE ор-А5С(1%)- 
38;IF ор<1 OR ор>4 THEN 470 
480 IF op-4 THEN CLSH3:GOSUB 2670: GOTO 460 
490 ОМ ap GOSUB 500,570,610:60Т0 460 
500 CLSR3:3=1:a=16: ТЕ n1 THEM GOSUB &30:а=0 
510 LOCATE 17-a,22:PRINT"Fila nun':c$-b$(3) 
520 col=30-a: GOSUE 1910: f=VAL(d$):IF +11 OR 4212 THEN 520 
530 LOCATE 1,22:FRINT SFACES(GZ) 


RINT USING "##";# 11Р mont 


PIFRINT')"ILOCATE gX9*4-LEM(a 


LOCATE gX9*4-LEM(cS) „ВЕ: РКП C$; NEXT; NEXT 
nu 1=Canbiar Z=anadir 3=cambiar nonb 


540 k=0:GOSUB 1910: 1F 1 d$-STRS 190,927 L41-LEN (d) GOTO 
2170 
550 d(f.g)-VAL(G&):IF f> THEN еїз)=+ 


560 RETURN 

570 IF nid THEN n 
580 CLS83:GO0SUE 
5." P TABCH "Пе: 
590 18=UPPERS (INE? 


Le cnlunna "АЗ ТР (а) а! Уа contiene dato 


THT J60 ELE IF ABU MEET WI 
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852 CLSHO:FOR 1=! TO 12:d/!,3;-ü:LOCATE gX9-2,FISIFRIMT ЕРАСЕЗ (ТО 2MEAT:GUSUE 185 
O: RETURN 

610 CLSH3:g-1:I1F n^i THEN GOSUB elo 

820 ke1:G0SUB 1910:a8:3)=48: RETURN 

630 LOCATE 1,22:PRINT"Colunna 
1,22:PRINT SPACES (15) 


$02UE 1910; AVAL (48): ТЕ Op 21 THEN LOCATE 


249 RETURN 
650 RENIOBDOBRHOPOOOOHOOHOOOHBOHOHHOROE 
660 REM Formato ж 


£76 ЕМЕН НЕННЕ AAEE 

880 GOSUB 2190:LOCATE 1,5:FRINT"i) Titulo: ":РКІНТ TABi4);t 
$90 PRINTIFRINT:PRINT"2) Sub-titul PRINT TABi4i 38 

206 PRIMT:ERINT:PRIHT"Z) Etiqueta "жж 

716 PRIMT:PRIHT:PRINT'4) Etiqueta 
720 PRINTIPRINT:PRINT"S) Nivel de graf 
250 FRIMT;FRINT;FRINT'&) Opcion sno: "5 

240 IF month=3 THEM PRINT"No"j ELSE PRINT"Si" 

750 LOCATE 22,22:FRINT'Primer mes 7: "засні 

7&0 CLSHI:FRINTR!," Pulsa namero а cambiar МемЕМИ" 
770 iS-UPPERS(IMHEYA&):IF ізе"“ THEN 270 ELSE 
38:IF opii QR ap»& THEN 770 


Spsásciis;- 


790 length=36:1F op=i THEN lin 
790 2 THEN linet 

E 

810 


820 
820 IF ор<26 THEN 780 

840 CLS#1:PRINT#L,TAR(4i "Opcion anual т 18/09" 

850 i$-UPPERS(IHKEYS):IF i$="N" THEN month=0;LOCATE 14,22:PRIMT"NO";LOCATE 35,22 
¿PRINT"O ":GOTO 766 

860 IF 1%‹›"5" THEN 850 ELSE LOCATE 16,¿2:PRINT"SI * 

870 c$-' Introduzca el mes de comienzo":col=37:k=7:GOSUB 1910:month=VAL (48) : IF 
manthéi OR month?iz THEN 870 

880 month$=RIGHTS (years, (13-month) 2) +LEFTS (years, (month-1)%2);G0T0 760 

R90 PAPER 2:LOCATE ccl,lintPEN 3:FRINT СНА# (143) FEN О:РБІНТ SPACE&(length 
"ІР ms=3 THEN c$-b$(4) ELSE cé=b$(0) 

900 CLSRI:PRIMTHI,TAE|21-LEN (cS) /2) cs 

910 i$-INKEY$:1F 1857" THEM 710 ELSE |-А5С11%) 

920 IF iz127 THEN IF d$/3"" THEM LOCATE col«LEN(GS), 1intPRINT" ":d6=LEFTS(Ié, LEN 
(49) -1) :60ТП 970 ELSE 910 

930 IF 1513 THEN IF пе-9 АМО d$="" THEN 960 ELSE 990 

940 IF LEN(dt)-length THEN 980 

950 IF i432 OR 19124 THEM 7689 

760 34-4441% 


920 LOCATE col,lin:PRINT d£j:PEM 3: РА НТ СНЕФ | 142) :РЕН 0: 3070 PLG 
980 CLSRHL:PRINTAL ТАР (19) XX Entrada (nvelido ЕА БОН 1,731 FOR b-1 ТО, BOO:NENT 
¿GOTO 90: 


990 PAPER ©:РЕМ 1:1.0САТЕ col, JimiPRINT в ВРАСЕЕ (1+1епзЕР-ЦЕМ( 42) ; : RETURN 
1000 REPAROS КККК НАНЕ FF 
1010 REME GRAFICO DE PARR: + 


1020 REMO ARO ROO 
1052 GO3UB 21 


GO&IE 2230 
THEN nid=50;disp=0 ELSE IF 91-2 THEN wid=13:disp=15 ELSE IF 21-2 TH 
ELSE uid=10:disp=" 

1050 POKE KSSEE wid:POKE k8SEF,disp:CALL KSSF3: вото 2750 

1660 КЕМЕК КОЕ ХИЖИ ЖЕ ен 

1070 REMS “ GRAFICO DE LINEAS x 

1082 КЕНЖЕБЕК 

1090 GOSUE 2190:6 2230 

1100 FOR a VAL (HIDS (d$, a, 1)) 

IF мат ID 354 THEN MASI 2: GRAFHI: 
20 AMD п-0,5) +(8(1,3) -мвс) Ks. 


90,1600,9-(2 AMD 454): 


1150 Ғіз%-(4(4,41-4(6-1,31)4ее:ТЕ NOT (cpcdé4 AND 
0,У1%Ғіз% 
1140 ТЕ срс454 AND 324 THEM h, 


MOVE ;1,,1:DRAW хі: 


Brystig 


¿P:FOR bsO 
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ЕТІ 


BARRAS 


COMMANDOS: namenu ішіяргезога R=Repite 


зға R-Repite 
BANRAS 


TO hyp STEP EtFLOT xI«bX4, yl 5X 
1150 15х1440: 45 урати НЕЗТ 
1160 IF МОТ cpc4é4 AND 3-4 THEN 
1170 NEXT:PLOT 1006,1000,1;G070 
1180 REMIJJXCHODO0880 ХУ 
1190 КЕМ% aficos de tart 
1200 A куха. 
1210 SOSUB 2190:h=0;c1 085=0; IF 
90 
1220 LOCATE t,S:PRIMT"Por files 
1230 TS-UPPERP(INKEYSO SI, ізі 
1240 LOCATE 32,5:PRINT 18: ТЕ i 
1250 cross=1:+f1N=0;LOCATE 1.12 
1260 f-VALId$i:IF )OMAXG (13 ле! 
1270 GOSUB 2230:LOCATE 1,16:FK1 
IF е13) <2 THEM 1320 
1280 IF е(9)<2 THEN 1320 
1299 с сйт: 1 ОСАТЕ 1, I S:ERTMT"T.- 
1300 i*-UFPERS(INKEYS):IF id" 
1310 LOCATE 31,19:FRINT i$: OCA 
а а resaltar";col-i GOSUB 
1320 ТІР ет 
ит. 
1340 50 2586 “crass 
M PRINT аз(3) ELSE IF month=0 
LSE E a (нал а, 4%2- 
то 
ЭТЕ 


HILE bivar*seg: DRAW 
var tseg: DRAW 12043TH (v 
1390 MOVE IlOXSINivar -Sea/21. 11 
1400 IF se3í12 AND a4»h THEM PE! 
RINT'K Sin etiqueta en el grafi 
1419 MOVE 130Y5IN(var-se3/2) 11 
-120)- 240 XCOSivar-sea/2) + 16 
Е а}? THEM numbs="#H" 
1420 IF mosthi>O AHD cross-G THI 
опре aj 
1420 TAGOFF:DRIGIN 200, 183: ОСА 
INT MID&(month$,aX2-1,2); El 
46 PRIMT";"::IF cro 
FRIMT TAB(Z4) USINO "НЫ. в 
NEXT ге, о: вота 2810 
PEPDOODOODOQOODOOOOREIOOROXOOE 
"AEICD DE PARRAS HAF: 


THEM PRINT akla}: 


our 


MASK 255,1 

2730 

ж 

a Й 

AE 

nzl THEM а=": лее (8) IF si3)%2 THEN 1320 ELSE 12 


o por columnas (РС) " 
" AND 18:70" THEN 1230 
се THEN 1270 
FRINI"F1)a пита" 
2) siZ) e(O THEM 12 
NT"que datos?":k=4:GOSUB 1971054 


¡GUSUB 1919 
ELSE 1290 
=VAL (9) ifi 


tn resaltado 15/М)" 
SE ТЕ 1912"5" THEM 1300 | 
egmento num "icSa" Introduzca numer | 


THEN 1520 El 
TE PRINT" 
19103 H=VAL (4%) 
oss=0 THEM f-a ELSE эта 


žo, 4:PRINT"Porcentajes ¡LOCATE 1,9: 1F cross=0 THE 
THEN FRINT'Fila:"rif E 

1,2) 
fin 
а= 


КІСІМ 260,18411F eross=0 THEN #=а ELSE 3=a 
THEN ORIGIN 200 +20#51М(маг +ве3/2),184+20#С08 


1204SIN(b), {ZOFCOS íb) :bsbtóz WEND | 
аг), 1204005 (маг) : ЕАМ 0,0 

ОХСОВ (уаг-зеч/ 2) ТР NOT срс464 THEN FILL а MOD 4 
М P:iLOCATE 29-crosské,SFaiFRIMT'K'iLOCATE 29,23:P 
"ТРЕМ 1:50Т0 1420 

£+316 AND (агу UR (MOhthi20 AND cross=0))))*+1XFOS 
X(VFOS+110)/240: TAG: I 


ЕН PRINT MID$(montht,aX2-1,2): ELSE PRINT USING n 


TE Zü-crnszké,SeatIF стават) AMD manthi*Q THEM PR 
FRIMT USING nunb$iai 


нз LOOXABS 


dif «3)) /tot s PRINT" 


FEKI EK NK 
AES X 
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1490 REMJOXODOBODDOOOOOOOODOHOOGOOOOHOSROOOE 
1500 GOSUB 2196;G03UB 2730 
1510 PLU: 112,352:DRAUR 0,-240:DRAUR 420,0 
1520 IF grid2! THEN FOR 4-1 TO 12:МОМЕ 112, 8204112: БАНЯ 480,0:МЕХТ 
1330 TAG;FOR #=1 TO 12:PLOT 106.FXZ0+102, :: DRAWR 4,0:PLOT 1000, 1000, 2:MOVE 70,4% 
20+108:1Е morth=0 THEN PRINT USING "B4^ift ELSE FRIN 
T MIDS months, ##2-1, 2) 
1540 NEYT:FOR 4-п TG BLOT EKIR, LOG, LEDRAVR 9,441240 AMD 3rid-1)2MEXT 
1550 PLOT 1000,1000,2:ҒОК 4-2 TO 10 STEP 2:МОУЕ 105+#%48,100:60508 2910: МЕХТ 
1560 PLOT 1000, 1606, 3: МОМЕ 35d-18XLENi;4) /2,78:PRINT y6321F s? THEN PRINT" (кеф 
STR*(10^ !s-2))4"] ^j 
1570 MOVE &0.246*16XLEM (4$) /2: FÜR {=1 TO LEMixS) :MOVER -16,-L6:PRINT MIDE Ix#, £, 1 
Ji НЕХТ 
1580 IAGUFFICALL мвевв: вота 2730 
1590 REPHHOHOOBÓOOHOOOOOHHOHOOOHRBUOOOUOGIE 
ВЕМЖ GRAFICOS 3D + 
REPOCCOEOOOOQOOH/HOOQOOOHOOODOOHPO)Ogeer 
GOSUB 2190:GOSUB 2230 
FOR h=0 TD 81: МОЦЕ 16045420, 2764EX20: DRAUR 0, 190: DRAUR 3014-1411 ЕКТ 
FOR b=176 TO 274 STEP 2G:MOVE 156,b:DRAWR 4,0:DRAWR d1X20,d1X20: DRAWR 384,- 
EXT 
FOR b=! TO 12; МОМЕ 180%0Ж52,174-ЕЖіз; ОҚАШЕ dlXZO,dlXZO:DRAWR O, 1003 NEXT 
TAG:PLOT 1000,1000,2;FOR f=0 TO 10 STEP 2:MOVE 158,182***10:G03UB 2910: МЕХТ 
SOSUE 2960:PLOT 1960,)G600,2:FOR b=0 TO 11:М0/Е 152*bX32,16&-bX12 
IF month=0 THEN MOVER -4,0:PRINT USING "##";b+i; ELSE PRINT MID$(month$,bX2 
*1.2h 
1830 MEXT;PLOT 1000, 1000,3; MOVE 278-20RLEM(48)./2, 904B%LEN(28) /2: РОВ b=! TO LEM 
SI MOVER 4,-ВІРБІМТ МІ0%(4%,Ь,1)):МЕХТ:ТАФСЕҒ 
1700 сащ. 58920:6070 2720 
1210 REMI LEE EEN SF ТТІ 
1720 REMK | CARGAR/SALUAR DATOS * 
1710 БЕМУХУУ FERX ЖО РЕЗ 
1780 OSE 217 RINT"CARGAR/SALVAR о RETORNAR? (C/S/R) "; 
1250 ==0; 14=UPPERS(INKEYS); IF i$-"R" THEN 190 ELSE IF 1% THEN s=1 ELSE ТЕ i$ 
АРС" THEN 1750 
1760 ТЕ AND қ-а THEM CLSHI:PRINTH1, ТАЕ(12) "Мо һау datos":FOR b=1 ТО 1000: МЕХ 
T:CLS#3:60T0 1750 
1270 PRINT 1%:10САТЕ 1, 12:PRINT"NOMBRE>?:":length=8:lin=12!c01=16:GOSUB 890 
1789 PRINT;PRINT:1F s-1 THEN 1820 
1790 OPENIN d$: INPUTH?,n,nsc,t$,s$,x$,y$,nonth:IF month<>0 THEN INFUTH9,months 
1805 FOR 351 TO n:INPUTHO,=(3),26 (3): FOR #-1 TO 12: INPUTHO, d (1,9) NEXT: NEXT 
1810 CLOSEIN:SOTO 196 
1820 OPENOUT d$:URITEN9.n,msc,t$,s6,x€,v$,month:IF month<)0 THEN WRITE? months 
1820 FOR 8-1 TO n:WRITEWH9,e(g),a$(g):FÜR 4-і ТО 12:URITES?,di4, 3) : NEXT: NEXT 
1840 CLDSEQUT:GOTO 190 
1850 REMBOHOXHOOOOODODUOOOOOOOOOOOO|O|UOOE 
1860 КЕМЕ ENTRADA DE DATOS x 
1870 REMXX)OXOHOOOOHHOOOOOHHOOOOO]HC||aer 
1880 LOCATE gK9,6::PRINT USING"H"; 3 RINT") SUB 1910:a$(3)2d$ 
1890 FOR +-1 TO 12 :G08UB 1910:1F i-endat OR ndat+32 THEM 1900 ELSE 4(+,9) 
EVAL (d$) : NEXT 
1900 2t9)94-1: RETURN 
1910 КЕМЕ 
1920 REMX RUTINA PRINCIPAL DE TECLADO X 
1930 REHJOJXODHOBOUOUOOIOPHOUHOBOPOHOROOK 
1940 IF k=O THEN linefr8:lengthe7:maximsS7:minim-45:c$-bs(1)iendatzé9:excepz47 E 
LEE endat=256:exce 
1950 IF цяр THEM li length=8:maxim=127:minim=31;c$=b8 (0) 
1760 1F THEN ¿col=29;1length=n:c$=b$1(2) 
1976 IF ТНЕМ ength=1 
1990 IF THEN li engthel 
1990 iF THEN 11 ength-2 
20660 IF 1-2 THEN $1-34:1ength-& 
2010 1% THEN 2: length=2 
2020 IF k«2 THEN X9«4 ELSE ТЕ k*2 AND 556 THEN col=16 
2030 IF k:4 THEM maxim=S7:minim=ds ELSE IF i»! THEM masin=ni4S1minim=39 
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VENTAS DE ORDENADORES 


GASTOS 


LEYENDA 


1999 


MANDOS: M-Menu IcImpresora R=Repite LEYENDA 
1985 -1986 


LINEA 


COMMANDOS: M-Manu I-lamessama R-Repite 


LINEA 


2040 IF коз АН k7 THEN có=b6(3) 


2050 РАРЕЕ 2:РЕМ G:LOCATE co!-length, in:PRIMT SPACES (lengthi:d :d1=0 

2050 CLGNITFRINTHi,TAR(21-LEN(c*) /2) c 

2070 issIMKEY&:IF i$="" THEM 2070 ELSE 
| 2080 IF i-127 THEM IF 41520 THEM LOCATE col-dl,lin: TO баеса, 41-12260 
| TO 2120 ELSE 2070 


2990 IF i 
2100 IF d 


2 AND 31:20 THEM 2172 

ength THEN 2130 

endat ПЕ i-zendati32 AMD 4зе”" THEM 2120 

E AND НЕН IF IMETR(d$,19)420 THEN 2130 
4151 AND i-45 AND K=O THEN 2180 

itminis OR так а OR хсер THEN 2180 
seis 

| 1160 di-LEM(d$):LOCATE col-d],lin:PRIHT 24: 007! 
| 2170 PAPER 0:РЕМ 1:LOCATE col length, lin; 
2180 CLSBI:PRIMTHi,TAL(IO)"XX Entrada invalida XX':50UHp 1,7 
T:GGTO 2040 

2190 E GOL 

2200 REMX* IMPRIMIR CABECE ғ 

2210 REMAKE ENKS IHN SFU EER 


с 


RINT: RETURN 

2220 ILE 

2245 KEMX Qu а? x 
E ӨЗУ ЖЗ 

2240 ТЕ из! THEN de="1":d1=1;1F ms=& THEM 2390 ELSE 2330 
2270 FRINT:PRINTIPRINT"Rue бабо": PRINT 
2280 FOR £-1 TO n:FRINT USING"R "5453 PRINTO) 
2290 LOCATE 1, 1StPRINTUDatos а reprosentar! 
0 

2200 REIR RODAR 
2310 КЕМЕ Tendido de lineas? * 
2320 REMHOHOCHOROOHOOOOUPOHOOOOOOUOOHOUCE 
2220 LOCATE 4,12:PKINT"Desea tendido de lineas  (5/M)" 

ТЪЗПРРЕЧЕ (ТНКЕУФ) ТЕ i&-"5" THEN gri ELSE IF i*-*W" THEM gr 


$(F)INEXT:IF mi 
:SOSUB 1910:С15 


2350 СЪБ 

2360 REMUJOGGOOOOOOHOUOOOOOOO|OO|OOOCOOOOO 
2270 REMX ESCALA E 
PIDO REMXYDUIODOQQOPOOO 00 ORAR 
2290 LOCATE 14,10:FRIAT"ESPERE UN МОМЕЙ 
2400 ТЕ ms-7 THEN FOR 4-і TO 12:414,0 
галя 

TD а1:те mz 
AES(d(E 3) - 
+1! ЦЕНО 


2430 WHILE b'ic* 
IF os THE 


FRINT SPACES (1emath 0111035 RETURN 
Ок Ь=1 TO 500: MEX 


2270 CLEFFAPER 2:РЕМ O:LOCATE (21-LEN(opt$(ms))/2), 1 :FRIMT optt(ms) :PAPER О:РЕП 


THEM RETURN 


IF ms-8 THEN 236 


ак! ТО dligeUA. (HIDE (dS, 5, 122 id (FO 


AL (МТОФ (а, a, 12) 


id-o ELSE 


m 
el 
+ 
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ЕТЕТ 
FOR ізі TO eta 
БУЕ THEN 8951 ELSE 
МЕХТ:НЕАТ: ІР 522 THEM қ 
A THEN w-i:dl2LEM(S: 
т Е пв=5 THEN 2580 ELSE ТЕ ms=S THEM se-sc/2.4 
JGGOOGOOOOHOOOOBOOHOOOO EE 
datos П 
ПЕОН А ККЕ x 
POKE 35001,d1; IF ms=4 THEN FOKE 35000, 114+(120 AND 150.5) ELSE FOKE 35000,1 
70+(56 AND n=0.5) 
2550 FOR a=di TO 1 STEP-1:g-VALIMIOS(dS.a, 12) imenz(dl-a) #13#25002:РОКЕ mem,g:mem 
zmenil 
2550 FÜR f=1 ТО e(g):IF ns=7 THEM PORE men,AES(d(f,5)Xsc) ELSE POKE пем, ГМТ ((25а 
AND 55М1(41Ғ,2)-пвс))--1)%(424,3) твс) Хес) 
2520 menemen tI: NEXT: 
2960 CL& 
2590 БЕЙИН КК RNY FX FERNY жж 
2460 БЕК INPRIMIR TITULO: x 
2810 REMJOXIO OOOODOOODOOPCOHDOOOGOHGERXK 
2620 PRIN" ТАВ(21 LEN(tS).D) jEB:DRIMT TAB(21 ЦЕН( 88) /2) Ped: ЛЕ mséd OR ma,S THEM 
RETURH 
2612 REMXXXJOHOODODOODOOODGOODODBHOOOBOD HA A 
2640 RENÉ Díbesa grafica de linea , barras X 
2654 REMEXIOU OPEK EKI ELEKI XAKEA RAIEK FNS EK ¥ 
2842 MOVE 112,35 | O,- 240: МСУЕ 112, 1131126 AND m=0.S):DRAVR 490,0 
2670 FOR f=132 T MOVE ОВ: DRAWR 0,21 ТЕ с 1451 THEN MOVER 20 AND m 
5=4,2:DRAWR 2,242 
2680 MENTIFOR f=112 ТО 352 STEP Z4;MOVE 108. :DRAVR 4%(480 AMD зг 2.6 7 
2690 TAG:FLOT 1000,1000,2:FOR f=0 Тї 10 ТЕР MOVE 103,118:4#24; B 2910; ЧЕХТ 
200 GUSUB 2960 
2710 PLOT 1000,1000,2:Е0 ! TO 1L:HOVE Һ%40%114-:2 AND month=0 b49) , 100: IF 
th=0 THEN PRINT USING "Hs';b*1j ELSE PRINT MIDS( 
month&,bX2e1,2)1 
2720 MEXT'PLOT 1060,3:MOUE ZE1-IZXLEH(A*)/2,77:PRIMT да AGGFF RETURN 
2720 REMXQOOUHECOOOOGEOBOOOEHOOBOHOGEX 
2740 БЕН Leyenda x 
2750 REMO DONOSO 
2750 LOCATE (,22-(2 AND me=0) ¿PRINT*LEYENDA 
2772 FOR f=1 TO dli 3=VAL (MIDS(d$,f,1)):PEN з- (2 AND 324) 
2794 Ik ns 25 THEN PRINT СНЕ%1253-(1 AND 9=4)-(3 AND g-4 AND ms-7i); ELSE FRINT 
СНАФ(221-(1 AND 3=4))3 
2790 PEN 1:ЕКІМТ аФіз)!" IF изка THEN PRINT 
2800 NEXT 
2510 БЕМ КК KINE EREK ERK HINEN EFE 
2820 БЕМУ Commandos к 
2820 КЕП ЖАЖА ХОН 
2840 CLSWI:PRINT #1, "COMMANDOS: MeMenu I=Impresore : › 
SO PZ-UFDERB(INKEYS)IIF 1%='И° THEN 198 ELSE ID o. THEN 270 ELSE IF i<" 
" THEN 2850 
2850 GOSUB 2870:G0TQ 2840 
2870 CLSRLTPRINTHI,TAE(14) "Espere on momento" 
2880 POKE £EB1C,149-(29 AND ms=Zi;CALL НВЕО9:ТЕ 1 0)=0 THEN RETURN 
2590 CLE#1;PRINT#L, "МО PREPARADA FEINTENTAR/CANCELAR 
2900 i$-UPPERE(INKEY$;:1F 12="C" THEN RETUR: i&-"R" THEN 2870 ELSE 2900 
2910 REMO 
2920 REM Escala 3rafica ж 
2950 EAN ВНООНОННОВВВОНЕ 
2940 5-11-15 AND п-0.5))%10%х-с/ (з5Жт):ІЕ mst)7 THEN g-g*INT(msc/10^ts-xsc)] 
2950 9%-5ТКФ(9) ¡MOVER -16Ж.ЕМ(9%1/(1%51 AND ms=2)),O2FRINT 38; ¿RETURN 
2960 х=112+(44 AND ma-B)-1&XLEN(g$)iy-246* (32 AMD ms=8) 
2920 IF 322 THEN $$-"x"4STRE(10^(5-2)) MOVE x, v*L&XLEN!£&) /2: FOR Бей TO LENCE) А 
MOVER -16,-16:PRINT MIDE(48,b,1)3: NEXT 
2980 PLOT 1000, 1000, 3:MOVE x-(16 AND $22), v*16*LEN(y$) /2:FÜR b=1 ТО LEN(yS):MOUE 
R -16,-16:PRINT MIDS$(ys,b, 1); МЕХТ: RETURM 
4000 REMBOGHOOHOOHHOHGOOHHHOHOOOUHOOREGGK 


A 
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numeroso" 


GASTOS 


DUNA 


OMMANDOS: M-Menu 1=1йўтезога R*Repite 
3 
COMMANDOS MeMenu I-LAprexera R-Ropito 


4016 RENX рошеағ Сит * 

4020 REIIXJHOOOOHOOHOHOHOHÓBOUOHHHRGIOROOE 

4920 CLS:PRINT"POKEANDO CODIGO-HAGUINA..,... ESPERE 
4040 RESTORE 4030: x=35059; FOR TO $: READ зе: tot: 
4050 CUAL ("к" "ИТВ (аз,5#2-1,2)) i tat-tot C;FOKE х,с НЕХТ 

4060 READ check:1F tot<ycheck THEN PRINT"Error en linea “;4020%а%10:5Т0Р 

4070 HEXT;FOKE 25428,4:Р0КЕ 19379,м4С: POKE 35580,64:POKE 35581, 1; RETURN 

3086 DATA Б021Б98800440228003АБ8886ЕС5Е52174С053АЕҒВ85Ғ1400722028021918ҒАЕРЕ10022 
DD?EOG32FOGGCDDEBDOAOCCSESDSDD2306007DFECADD7EO02009 
А?Е22989Ер444ҒЕ0420502260222Ғ18ВЗАЕЕ88,9500 

4090 DATA OF47CD2BBAIOFBEIOECGOSEBEICIlOCECIIQAAOSJEAF2IBG38772310FC3CCDDEEBC93A 
B?SCliODOOZIBABS1TYZDZ2UFCESESDDEiFDE121/400060CCSFDES 
DD23DDESSAEORGA2117200C8040DDD2BFD2E12, 9209 

4100 DATA FAFDZECOSZFOSSCDDEBEESDD7EQ0A?2828326F402922F 1 8BE 1ESOSC 7C DESSAESDSCDDS 
&4210000EDSEF188CDEEGADIE1232310EBCDC 4BBI31zEL C1 10BE 
9Е140%0Е1ҒОЕІС1:085С2553900219582046,11185 

4110 DATA ООСБАЕС i1CFCA4F21750009EEXARSa224404F09C &CEESTEDDOXDD2ESO12FQ88240CCS 
202228000Е?0ЕЗЕЕБ0ФЕБЕ1СЕОСЕ42007ЕООА?281205Е5Ғ22584 
ЕП444ҒЕ04222Ғ168С04084610101100501Е10Е,9722 

4126 DATA |4ЕПСП42ЕВЕРАФС|1ОБВСС5 069ЗАРОВаСПОЕПВОВОВ?ВРЕОЕ2ЗО4ГЕООО22БЕРСООВВА 
1ОЕОЕВОВО10(042723СРЕГВАСОА16А! OF 601Е 1 ЗАГОВВЕЕО4СВ1В 
IPAFIFCDDEPACDEBRACOCéBRCDADEACDEZGA!1, 106909 

4130 DATA OGUU525BCDEBSGACTYUDDSHACDESSAESDSZAF 1681 10000СПЕЕВЗАП1Е11513СУЗАРОВВЕЕОЯУ 
2005D&CzCDDEBEESDSCSCDCAbRGAQ73EO591902604D402260923 
2379A72803:0E3841B1BCDEZBALQESCIDIEIC9, 10372 

4140 DATA TAFOSSFEC4COCBAO38O2D4O2CDDEEBCOCHIEESCDEARBIBCeCEDSESCDFOBBEiDICICSIE 
301B731215240440010D08000007030201020021F885A0505 7ECD 

2RBOISOSIPERADCIOT пел? 1960751 106065F, алле 

4150 DATA OZOSACCSESZIFAGAQGGSCDSCSEE ICICZDSESCDS7GEGEQZEDBOE!DIDSESOSOZCSZB2BDS 
EBCDE78B060215070785122; TEiDiCitGE&2iDSaaCDBABE 
E1D1C113121 CBODZOBAZIFFSACDGASBEIA7OE, 10200 

4160 DATA OetD427CA"20A47DlELO209 2IFBGACDGADEATZZBGSGC 
ÉGEDFOÜERD:015h11B9086704004FO9C9, 6093 


OR b-i TO СЕМ( аз /2 
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ay una gran де!- 

nición de la dife- 

rencia entre 

Hardware y Sort- 

ware: ¡si le pue- 

des dar una pata- 
da entonces es Hardware! Hardware 
ез la electrónica y la carcasa en la cual 
está montada, Sottware son los pro- 
gramas que proyectas sobre el orde- 
nador. Es como un sistema de alta fi- 
delidad —el amplificador, el reproduc- 
tor de cassettes y los altavoces son 
hardware, mientras que la música que 
pones es software. 

El Hardware de un micro-ordenador 
consta de diferentes partes que inclu- 
yen un teclado para mecanografiar las 
instrucciones y una pantalla (monitor) 
para exhibir los resultados. Esta podría 
ser tu propia televisión o una pantalla 
especialmente modificada y acoplada 
al ordenador. Sobre ella podrás repre- 
sentar caracteres alfanuméricos 
(A-Z, 0-9 y puntuación) y caracteres 
gráficos especiales para diagramas y 
dibujos. Estos caracteres van desde 
sencillas líneas y cuadrados a compli- 
cados símbolos de juegos. Cuanto 
más alta sea la resolución de tu pan- 
talla, más finas entonces pueden ser 
dibujadas las líneas y más limpias apa- 
recen las curvas. 

Por dentro, el ordenador está com- 
puesto de circuitos integrados (IC) o 
«chips» —pequeños y sólidos compo- 
nentes electrónicos enfundados en un 
Plástico подго. El más importante de 
estos circuitos es el llamado «Unidad 
Central de Proceso» o «CPU», que lle- 
va a cabo todos los cálculos y dirige 
lodo el sistema, trasladando la infor- 
mación a todas las partes. Los dos mo- 
delos más comunes de CPU (Unidad 
Central de Proceso) son el MOS Tech- 
nology 6502 utilizado en los ordenado- 
res Commodore, Apple y Atari; y el 
Zilog 2-80 utilizado por Tandy y Sin- 


clair entre otros y por supuesto Ams- 
trad. Otros dos CPUs populares son el 
MOTOROLA 68000 y el INTEL 8088. 

El ordenador tiene dos clases de 
memorias. La Memoria de Acceso 
aleatorio (Random Access Memory) 
o RAM que es una memoria temporal 
—cualquier cosa almacenada en ella 
se pierde al desconectar el ordena- 
dor— el término técnico es volátil. 

La RAM se utiliza para almacenar: 
todos los comandos (instrucciones 
para el ordonador) que mecanografía, 
el programa que está habitualmente 
ejecutándose y los datos (información) 
a los que se refiere dicho programa. 
Estos datos consisten en «variables»: 
una variablo es sólo una pieza do in- 
formación y tiene un nombre que la 
identifica, por ejemplo: PRECIO y un 
valor 5. 


La ROM (Read Only Memory: me- 
moria de sólo lectura) es una memoria 
permanente —no puede modificarse, y 
al desconectar el ordenador no se 
borra. La ROM se usa para almacenar 
los programas especiales que dicen al 
ordenador cómo comportarse. Estos 
pueden incluir el Sistema Operativo 
que capacitará al CPU para dirigir la 
pantalla, el teclado y la memoria a la 
vez. Los sistemas operativos varian de 
una máquina a otra, aunque hay pocos 
estándares como el CP/M, MS-DOS y 
el Unix. La ventaja es que los progra- 
mas de aplicación escritos en un orde- 
nador usando un determinado sistema 
operativo, a priori pueden ser compa- 
tíbles con cualquier otro ordenador que 
ulilice el mismo sistema, sin tener en 
cuenta su disefio individual. 

Hay otras clases de memorias, tales 
como PROM, EPROM, EEPROM, e in- 
cluso EAROM, cada una con sus pro- 
pias características de realización, 
pero son usadas generalmente sólo en 
aparatos especiales o para propósitos 


u 


| 
por 


کا 


de desarrollo anteriores a la produc- 
ción a gran escala. 

Todas las formas de memoria son 
medidas con las mismas unidades. Un 
Bit —abreviatura de «Binary Digit» 
(Dígito Binario)— es la unidad básica. 
de la memoria de un ordaandor, у «біп 
puede ser usado para almacenar un 
«0» o un «1» —el equivalente a ser |: 
desconectado y conectado. Estos bits 
se combinan en unidades mayores 
para almacenar información útil. Ocho 
bits para un byte y muchos de los 
CPUs procesan un byte de una vez, 
Un byte es generalmente el equivalen- 
їё а un dígito sencillo о un carácter, 
pero puedes representar algo más 
abstracto, 

Algunos de los más nuevos y avan- 
zados CPUs, como el 68000 y el 
28000, procesa 16 bits de una vez, un 
considerable aumento de velocidad. 
¡Un proceso corriente puede ser lleva- 
do a cabo en aproximadamente la mi- 
llonésima parte de un segundo! 

1024 bytes hacen exactamente un 
Kllobyte о KByte —por lo que un or- 
denador de 64 K tiene de hecho 64 * 
1024 6 65536 bytes de memoria. La 
razón de este número tan raro es que 
puede ser convenientemente expresa- 
do en «binario», que es el sistema de 
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numeración usado por los ordenado- 
res. 

El CPU es capaz ünicamente de 
operaciones muy sencillas —como su- 
mar dos dígitos— pero puede hacerlas 
a gran velocidad. Para que se ejecute 
alguna función real, el CPU necesita 
de una larga lista de instrucciones 
—un programa— escritas de una for- 
та que pueda entender; esto es llama- 
do código máquina. 

Desgracidamento, es bastante difícil 
su manejo para los humanos, y consis- 
te de filas de dígitos; el resultado es 
Una programación muy lenta y que no 
admite errores, Por tanto, se han de- 
sarrollado para ordoandores varios 
lenguajes de alto nivel, que son bas- 
tante parecidos al inglés, y consecuen- 
temente más fáciles de programar. 
FORTRAN es el lenguaje adecuado 
para los cálculos de ingeniería, mien- 
Газ que la moyoría de los programas 
de gestión están escritos en COBOL. 
Con mucho, el lenguaje más común y 
también más fácil de aprender es el 
BASIC, El más estándar es el llamado 
Microsoft BASIC y se encuentra en el 
PET, APPLE y muchos otros 

PASCAL está alcanzando una gran 
popularidad. Es más duro de aprender 
pero mejor para escribir programas lar- 


gos e inducir a una buena disciplina de 
programación a los nuevos programa- 
dores, 

Los programas escritos en un len- 
guaje de alto nivel han de ser transtor- 
mados en Códigos Máquina antes de 
que puedan ser programados por el 
CPU. Hay dos tipos de programas es- 
peciales que llevan a cabo esta traduc- 
ción, el primero es el «compilador» 
que traduce todo el programa al códi- 
90 máquina antes de ejecutarlo, lo al- 
macena en otro espacio de la memo- 
ria y después lo ejecuta. 

El segundo tipo de Basic es el «in- 
terpretado» que actúa almacenado el 
programa en Basic y cada vez que lo 
ejecutamos es traducido a código má- 
quina línea por línea. 

Generalmente, un programa «inter- 
pretado» tardará unas 10 veces más 
Que uno compilado, pero usará menos 
memoria porque sólo se almacena una 
versión. 

Los «intérpretes» son más útiles si 
está desarrollando un programa debi- 
do a que al descubrir un error —un 
BUG en la jerga de los ordenadores— 
no se necesita recompilar todo el progra- 
ma. La diferencia exacta entre «Inter- 
pretar» y «Compilar» requiere una ma- 
yor explicación 

бі un ordenador está diseñado para 
manejar un número determinado de 
lenguajes de programación, los difa- 
rentes «intérpretes» y «compiladores» 
estarán almacenados оп la RAM. Las 
máquinas que sólo programen BASIC, 
sin embargo, tienen generalmente un 
«intérprete» on la ROM. 

A esta clase de software, perma- 
nentemente almacenada en el Hard- 
ware, se la denomina a veces ¡FIRM- 
WARE! ¡Y ahora de vuelta al Hard- 
ware! 

Los circuitos integrados (IC) se 
mantienen en una «placa de circuito 
impreso», que es una tarjeta rígida con 
muchas y finas pistas de cobre que in- 
terconectan a los componentes. Real- 
mente algunos ordenadores baratos 
500 poseen una раса de arcuito im- 
preso. De los extremos de la placa de 
circuito impreso sobresalen los INTER- 
FACES que permiten al ordeandor in- 
tercambiar información con otros apa- 
ratos electrónicos. Este intercambio es 


Aunque para el principiante pueda ser desconcertante, la jerga 
es una parte necesaria del ordenador: tanto para evitar 
ambigüedades como para ahorrar el espacio, y esta sencilla guía 
para las expresiones más comúnmente usadas, ¡puede 
сопуепте de novicio en experto! 


conocido por INPUT/OUTPUT о 1/0 
(entrada/salida). Un interface está 
compuesto de varias líneas о cables 
--Патадоз bus— para manejar los da- 
tos (data) y de diferentes señales de 
control necesarias para sincronizar el 
tiempo entre varias operaciones. Las 
secuencias de los acontecimientos 
previos relacionadas con el intercam- 
bio de un conjunto de datos son cono- 
cidas por el nombre de protocolo 
—una expresión que proviene sin duda 
de la danza ritual de la diplomacia. 
Esta broma terminológica continúa en 
una etapa siguiente con una particular 
secuencia de salidas en un Interface 
y se la conoce por «handshake» 
(apretón de manos», esto significa que 
la transacción está completa. 

Hay varios interfaces comunes, así 
como un buen número de ellos que 
son propios y oscuros. A menos que 
use un medio especial de conversión, 
sólo puede interconectar aparatos que 
tengan un mismo interface. 

En Centronic, IEEE 488, el RS232 
y el S-100 son algunos de los están- 
dares más ampliamente aceptados. 
Los dos primeros son «buses» para- 
lelos, lo que significa que B-bits son 
transmitidos simultáneamente a lo lar- 
до de ocho líneas. 

Los periféricos más comunes se 
nombran a continuación: 

Las Unidades de Cassetes, que 
guardan los programas y datos de la 
memoria del ordenador en cassotte, de 
modo que se puedan volver a cargar 
de nuevo cuando se necesiten. 

El «Disk Drive» hace lo mismo uti- 
lizando una pieza circular de material 
magnético que gira dentro de una fun- 
da de cartón o plástico que se llama 
Floppy Diskette. Estos tienen gran 
capacidad de almacenamiento y per- 
miten un acceso más rápido. 

Se utiliza una Impresora para pro- 
ducir copias de la información en pa- 
pel, y generalmente ofrecerá o una 
gran velocidad o una impresión de alta 
capacidad. 

Por último, un Modem es una pe- 
queña unidad que convierte los datos 
electrónicos en sonidos audibles y a 
la inversa, de forma que se pueda en- 
маг la información a través de una li- 
nea telefónica ordinaria. 
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LOS PREM 


sano poo CADENAS ШЕЕ 
Ed aes. 


Madrid, don Xr 
Angel Pérez [9 
Fernández, se 4 
efectuó el sorteo 
de los sistemas 
musicales 
Amstrad TS-55, 
entre los 
suscriptores. 


GANADORES DE LOS SISTEMA 


+ Doña Carmen Pérez + Don Francisco • Don José Miguel 
Vázquez Javier Delgado López López 
Montevideo, local Varela Avda. Carmen 
12 Villasandino, 9, 3.°, Miranda, 8, 2. 124. 
21005 HUELVA 2. PRAVIA (Asturias) 


28011 MADRID 


* Dofia Magdalena 
Olivera Don Ricardo Bajo ә Doña Mercedes 
Rafael Calvo, 7, 4.2 Gámez Ibáñez de Gracia 
D Pedro Muguruza, 8 Madrid, 67, 2.° 124. 
28010 MADRID 28036 MADRID GETAFE (Madrid) 
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* Don José Luis 
Ordóñez Ausín 

| San Agustín, 17 

09001 BURGOS 


* Don Angel Martínez 
Núñez 
Aprestadora, 18, 
4.24, 

HOSPITALET 
(Barcelona) 


IMPRESORA 


e Don Francisco 


е Don Angel Vázquez 


----- 


Don Juan Carlos 
Mira Navarro de 
LINEA 21, S. A., 
de Alicante, 
realiza la entrega 
del primer 
premio (una 
impresora 
DMP-1) del 
sorteo 
AMSTRADIEZ del 
mes de octubre 
a don Vicente 
Sanchis Verdu. 


Javier López 

Herrero 

Calderón de la 

Barca, número 5, 6.-B 
ALCALA DE 
HENARES (Madrid) 


González 
Apartado 46 

Grao de Gandía 
GANDIA (Valencia) 
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i па, tendría que construir va- 
S rios caracteres que, super- 
puestos, formaran las diferen- 
tes partes del caractor deseado e im- 
primirlos, con plumas diferentes, en 
modo transparente, uno encima de 
otro. Por ejemplo, si quiere un hombre 
con cuerpo azul, pelo rojo y cara blan- 
са con un ojo, necesitaría un carácter 
para el cuerpo, otro para el pelo, y otro 
para la cara con un agujero para mos- 
trar el color del fondo a través del ojo; 
¡y todo esto trabajando en modo 1! Si 
fuera en modo O podría necesitar im- 
primir hasta 17 caracteres diferentes, 
lo cual resulta terriblemente lento. 

Así pues, para aquellos que quieran 
ип método fácil y rápido de imprimir ca- 
racteres multicolor (que, efectivamen- 
te, son sprites muy pequeños) en la 
pantalla sin recurrir a «montones» de 
código máquina, hemos diseñado dos 
sencillos ASXs. IMPUT para imprimir 
cada carácter, o una cadena de carac- 
leres multicolor en la última posición 
de impresión de texto, y IGPUT para 
imprimir tanto un carácter como una 
cadena de ellos en la posición del cur- 
sor de gráficos. 

Para utilizar cualquiera de los dos, 
introduzca simplemente el comando 
seguido de una serie de nümeros, se- 
parados por comas. Por ejemplo: 


10 LOCATE 10. 10: IMPUT 0.1.2.1 
20 MOVE 100,100: IGPUT,4 

30 MOVE 200,40:1GPUT.5,6 

40 LOCATE 20,3: IMPUT.T 


Los números escritos tras los co- 
mandos no se refieren al juego de ca- 
racteres normal, sino a otro que será 
diseñado separadamente y sobre el 
cual hablaremos más adelante. 

Como puede ver, ambas rutinas son 
sencillas de usar; sin embargo, tienen 
algunas limitaciones. 
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sor de texto detrás del último carácter 
que imprime, así que si desea mezclar 
caracteres multicolor y normales debe 
utilizar un comando LOCATE detrás de 
cada IMPUT. El comando IGPUT sitúa 
el caracter en la posición de byte más 
cercana en la pantalla, lo cual no es 
siempre la posición de pixel. Esto sig- 
nifica que puede moverse arriba y aba- 
jo de la pantalla con bastante facilidad 
pero sólo se moverá de 8 en 8 bits de 
pantalla a la derecha o izquierda. Esto 
limita el movimiento horizontal a medio 
carácter en modo 1 (cuatro pixels) y un 
cuarto de carácter en modo 0 (dos 
pixels). En modo 0 esto no constituye 
una limitación excesiva pero si piensa 
que el movimiento será muy desigual 
еп modo 1, pruebe entonces a diseñar 
dos o más caracteres con la forma que 
quiere ligeramente modificada en cada 
uno, de modo que, imprimiéndolos uno 
detrás de otro consiga un movimiento 
suave. Esta es la técnica utilizada en 
el programa de demostración. 


PAGUE EL PRECIO 


Hay que pagar un precio a cambio 
de toda esta facilidad de uso: se nece- 
Sita más memoria para cada carácter 
a imprimir. En lugar de los 8 bytes ha- 
bituales, un carácter multicolor en 
modo 1 necesita 16 bytes, y uno en 
modo 0, 32 bytes. Pero esto no es tan 
malo si considera que habría tenido 
que utilizar hasta tres caracteres en 
modo 1 о 15 en modo O para conse- 
quir el mismo resultado, y además mu- 
cho más lento, Un carácter en modo 2 
sigue utilizando sólo 8 byes y la rutina 
funciona de hecho con el moda 2, aun- 
que hay un pequeño problema para 
comprobarlo, уа que no puede tener 


su lugar el método normal del BASIC. 


UTILIZANDO EL 
PROGRAMA 


Primero, teclee el programa 1, sál- 
velo y ejecútolo, Si ha cometido algún 
error en los DATAS, el programa le avi- 
sará en qué línea se encuentra, Cuan- 
do el programa funciona sin errores, 
sálvelo y reinicialice la máquina apa- 
gándola y encendiéndola de nuevo. 
Ahora teclee e! programa 2 у sálvelo. 
Este le permitirá disenar sus caracte- 
res en cualquier modo que desee y sal- 
varlos en cinta (o disco). 

El programa diseñador es muy corto. 
y simple. Después de decirle el modo. 
que deseamos, entra en él. Para des- 
plazar el cursor por el carácter, utilice 
las tecias de cursor, y use la tecla сору 
para poner y quitar la pluma. Para 
cambiar la pluma pulse la tecla [Р] e in- 
troduzca el nuevo número de pluma, 
Para almacenar el carácter en memo- 
па pulse la tecla [5] y déle un número, 
Puede tener todos los que quiera 
mientras recuerde cuánta memoria 
gasta cada uno. Para reeditar un ca- 
rácter introducido antes en memoria, 
pulse ІНІ e introduzca su número. 
Cuando haya terminado de diseñar ca- 
racteres pulse [О] y, después de pre- 
guntarle si está seguro, le preguntará 
cuántos salvar. Recuerde, el número 
de Sprites comienza en 0. de modo 
que de O a 7 equivale a 8 Sprites. 

Ahora, para ver el fruto de su traba- 
10, debe reiniciar la máquina y ejecutar 
este programa. 


10 IMPUT «MODO»¡MM:MD = 11Р 
MM <> 1 THEN MD - 2 


¿Cómo conseguir caracteres multicolor en la 
pantalla, tanto en coordenadas LOCATE 
como en coordenadas PIXEL? Hasta ahora 
tenía que hacerlo en código máquina, lo cual 
resulta un tanto excesivo si el 99 por 100 del 
programa funciona suficientemente bien y 
con la rapidez necesaria en BASIC. 


'Pragrama 1 
20 'RSX para impresion multicolor 


50 h-HIMEM-1:1F PEEK(0)=0 THEN 20 

60 POKE 0,0: h=h-192:MEMORY (h-1) 

70 lin-1000: direi ¿FOR t=1 TO 192 STEP 8 
80 suma=0:FOR b=0 TO 7 

90 READ a$:a$-UPPER$(aS):n-l 

100 IF LEN(a$)<>2 THEN 370 

110 b$=MID$(a$,n,1) 

120 GOSUB 550:ІҒ a=0 THEN 370 

130 n-n*1:IF n=2 THEN 120 

140 p=VAL("£"+a$):POKE direc,p 


150 direc-direc*i:suma-suma*p 20 INPUT «CUANTOS SPRI- 
160 NEXT b:READ a TES»;S:MODE ММ 

170 IF a<>suma THEN 370 30 $ = S'16'MD 

180 PRINT"LINEA";lin; "OK":lin-lins10 40 H = HIMEM — 1 

190 NEXT + 50 MEMORY (H-S) 

200 r=h+9:a=INT (r /254) :Ь=ғ- (aX254) 60H = НМЕМ + 1 

210 POKE h*1,b:POKE h+2,a 70 LOAD «SPRITES»,H 


220 r=sht17:a=INT(r/256):b=r-(aR256) 
230 POKE h+4,b:POKE h+S,a 

240 r=h+21:a=INT(r/256) tbzr- (ай256) 
250 POKE h+9,b:POKE h+10,a 

260 r=h+30!a=INT(r/256)!b=r-(a+256) 
270 POKE h+41,b:POKE h*42,a 

280 POKE h+63,b:POKE h+64,a 

290 r=h+31:a=INT(r/256);b=r-(a%256) 
300 POKE h+122,b:POKE h+123,a 

310 r=h+194!a=INT (r/256) lb=r-(a%256) 
320 POKE h+31,b:POKE h*32,a 


que cargará sus Sprites. 
Ahora puede cargar y ejecutar el 
programa 1 de nuevo, Este moverá H|- 
MEM y se pondrá a sí mismo por епсі- 
ma y se activará. Ya puede utilizar los 
RSXs y ver sus Spriles aparecer en la 
pantalla, No olvide que el comando ІМ- 
PUT no moverá la posición del cursor. | 


así que si introduce: 


2342 сеа h IMPUT,0,0,0 

е " Й 
Бер ا‎ ETRS oea al mensaje «Ready» sobreescribirá 
370 PRINT "ERROR EN LA LINEA"; lin; "!":END sus Sprites, así que añada PRINT al fi- 
1000 DATA 01,29,4E,21,31,4E,03,D1, 684 nal del comando. Y recuerde situar el 
1010 DATA ВС,55,4Е,18,18,00,18,11, 408 cursor de gráficos en la pantalla con el 
1020 DATA 00,00,00,00,00,4D,50,55, 242 comando MOVE para poder ver los ca- 
1030 DATA 04,47,50,55,04,00,00,50, 708 raotoros, сото: 
1040 DATA 75,F5,AF,18,03,F5,3E,01, 872 
1050 DATA 32,3E,4E,F1,A7,C8,47, F5, 1114 MOVE 100,100:1MPUT,O. 
1040 DATA DD,23,DD,23,10,FA,CD, 11,1000 e К 
1070 DATA BC,47,3E,02,90,F5,3A,3E, 852 Bien, ahora debería tener las rutinas 
1080 DATA 4Е,47,28,04,С0,78,ВВ,20, 822 funcionando. Hay tres métodos para 


(Continúa! imprimir caracteres. Puede escribir los 
за == трае (а) || caracteres y borrarlos con IMPUT o 
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өз casi igual al modo transparente nor- 
mal. Esto significa que debe usarse el 
primer método се impresión si quiere: 
borrar algo con un carácter en blanco; 
de otro mado no ocurrirá nada. 

Para seleccionar los métodos, sim- 
plemente ejecute POKE 5,n donde n 
85: 


1090 
1100 
1110 
1120 
1130 
1140 
1150 
1160 
1170 
1180 


DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 


25,CD,1A,BC,18,1B,CD,Có, 910 
BB,B7,CB,1C,CB,1D,CD,11,1055 
BC,F1,FS,A7,28,08,47,B7, 1143 
CB,18,CB, 1B, 10,F9,CD, 1D, 938 
BC,F1,C1,C5,F5,DD,2B, DD, 1549 
2B,4F,06,03,80,47,79,E5, 480 
ED, SB, 3F, 4E, DD, 6E, 00,26, 838 
00,29,10,FD,19,EB,E1,87, 930 
20,01,5С,47,С2,Е5,00,08, 604 


2 a 255 para impresion norma. 
534 


1190 
1200 
1210 
1220 
1230 


DATA 
DATA 
DATA 
DATA 
DATA 


28,0В,ҒЕ, 


20,вс,с 


35,05,00,47,28,09,FE, 01, 


^7,28,05,18,02, LA, AE, 77, 
CD,26,BC,13,10,E2,E1,CD,1122 


, 
В2,С9,00,00,00,00,00,00, 


591 
557 


2, 1А,18,08,1А, 


0,D7,F1,C1,10,1094 
379 


IGPUT con un carácter blanco sobre 
ellos. Debe reservar uno de sus carac- 
teres para hacer esto. Tambión puede 
utilizar el modo XOR para escribir los 
caracteres en la pantalla, con lo cual 
se combinarán con lo que tenga en la 
pantalla, en la misma forma que en 
juegos como «Manic Miner» y «Sor- 
cery». Puede borrarlo reimprimiendo el 
mismo carácter. El tercer método sólo 
imprimirá las partos del carácter que 
tengan alguna tinta. No imprime bytes 


cero. Supongamos, por ejemplo, que 
sólo desea un carácter tamaño «mo- 
do 1» рего en modo 0. Si sólo diseña 
medio carácter, digamos la mitad іг- 
quierda, y deja el resto en blanco, 
cuando lo imprima junto a otro obten- 
drá normalmente el extraño efecto de 
borrar lo que había en la pantalla sin 
que aparezca nada en su lugar. Este 
método de imprimir suprime este efec- 
1o y permite imprimir caracteres peque- 
nos sin un «halo» a su alrededor. Esto 


1 para impresión XOR. 
0 para impresión transparente. 


Para vor a la rutina on acción teclea 
la primera parte del pequeño progra- 
та de demostración que prepara los 
caracteres. A continuación cargue y. 
ejecute el programa 1 y después car- 
gue y ejecute la segunda parto del рго- 
grama de demostración para ver un 
balón moviéndose suavemente а tra- 
vés de la pantalla, 

Como punto final, el programa fun- 
cionará en cualquier lugar de la memo- 
ria, así que si ha diseñado un juego de 
caracteres distinto con el comando 
SYMBOL AFTER hágalo antes de car- 
gar y ejecutar los caracteres multicolo- 
Tes y al programa 1 y топо га blen. 


10 *Programa 2 - 
20 INPUT "Modo";mm:md 
30 IF mmi)! THEN md=2 
40 SPEED KEY 10,1:MODE mm 
50 WINDOW&1,1,40/md,24,25 
40 MEMORY 19999 
70 q-1:BORDER O 
80 PEN 1:%%-ТЕЗТ(х,298-у):10САТЕ INT(x/2*md) ) +10, INT(y/2) +1: PRINT. CHR$(203) 
90 k&-INHEY&:IF ké-"* THEN 89 
100 kk=ASC ik$) 
110 LOCATE INT(x/(2*md))*10, INT (у/2) $41:PEM Et:PRINT CHRÉ(I43] :PEN q 
120 xex-(2*md)K((kketF3 AND x<(14%md))-(kk=8FZ AND x<>0)) 
180 уеу-2%!(ккекгі AND y£19)-(kk=6FO AND 7520) 
"Р" THEN PEN I:INPUTMi,"Pluma*; 

4 THEN te=i-(te=1) ¡PEN 15LUCATE 1, 16:PRINT"UFF. 
1, 16:PRINT"ON " 
160 LOCATE 1,15:PEN 1:PRINT"pluma "раз" 
170 ТЕ ивя"е" " THEN 240 
180 8” THEN 220 
120 за" OR k$="0" THEN 280 
200 IF te=! THEN LOCATE INT (х/ (2804) )+10, INT(y/2)+L:FPRINT CHR&(143):PLOT x,298-y 
19 
210 


-- DISENADOR DE CARACTERES 
1 


IF сек THEN LOCATE 


“IPEN q 


вота 80 

220 РЕМ 1; INPUTH1 
230 c=49152:FOR 

T n:NEXT b'GOTO Go 
240 РЕМ 1: INFUTH1, "Sp, ite"jaracaFiéXmd*2000O:PEM qiCLS#1 

250 ся49152: ОВ b=0 TO (2Xmd)-1:FOR n=O TO 7:РОКЕ с+ (1382048) tb, FEEK (а+ 8ЖБ+и) NEX 
T п: МЕХТ b:GOSUB 260;6070 ВО 

260 FOR b=0 ТО :4 STEP 2: ОВ n=O ТО 1434 STEP(md+2):tt=TEST (n,398-b):LOCATE IN 
T(n/ (2Xmd)) +10, INT(b/2)+1:PEN БЕ: ЕВТМТ СНВФ (143): МЕХ 

T п:МЕХТ О;РЕМ 1 

270 RETURN 

280 PEN L:INPUTH1,"Salvar 
THEN 200 

290 INPUTHL, "Cuantos";s:CLSRi 

300 INFUTA41,"Con que nombre" ;nombre$;CLS81:s-s*ié*md:SAVE nombre$,B,20000,5:G0T0 
200 


"Sprite"iatacaXlókmd*20000:FEN qi CLS#1 
TO (2%т4)-1:ЕОВ (-0 TO 7:РОКЕ at&žbtn,PEEK(c+(n¥2648)15):NEX 


Caracteres" ir$; CLSHi:r$-UFPERS (r$) ¡IF LEFTS (rS, 1) <2 "5" 
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MULTICOLOR 
Introduce los comandos residentes !MPUT y {РОТ 


LD EC, COMAND idireccion de la tabla de comandos 
LD  HL,BYTES jdireccion de 4 bytes para el 5.0, 
JP — MECDi 
COMAND: DEFW ВАС idireccion de la tabla de nombres 
JR. ENTRYZ ¡salto а la rutina "МРОТ" 
МОР 
JR ENTRY! ¡salto a la rutina “GPUT" 
DEFE #00 
DEFE 800,800,800,400 jarea para el uso del 5.0. 
DEFB "№", "Р", "U", 824. T'MPU', "таво" 
DEFB "G", "P^; i'GPU','T*MGO* 
DEFB HOO ¡marcador FIN DE TABLA 
FLAG: DEFB HOO jíndica si se esta procesando MPUT о 
г ¡6PUT 
DIRDAT: DEFW WA&é7C idireccion datos caracteres 
jaqui comienza la rutina GPUT 


5 
EN[RY1: PUSH AF ¡preserva no. de caracteres 
XOR A ¡borra acumulador 
JR COMUN 
jaqui comienza la rutina MFUT 
1 
ЕМТКҮ2: PUSH AF ¡preserva no. de caracteres 
LD жүйссі ізі es MPUT, flag=1 - si es GFUT, 
COMUN: LD (FLAG),A i£lagso 
РОР AF ¡recupera ho. de caracteres 
ANDA isi no hay caracteres, retorna al BASIC 
RET 2 
BA ізі si los hay, inicialize contador 
AF isalva no. de caracteres 
BUCLE. IX iy actualiza IX para que apunte 
IX jdetras del primer caracter 
BUCLE1 
#EC11 ¡averigua el modo de pantalla 
РЕ resta 2 modo 
402 
B 
AF ¡preserva el resultado 
A, (FLAG) carga el flag (1: МЕСТ - 0: GPUT) 
а 
2,GPUT2 tsi estamos en GPUT, malta 
CALL WBB78 ¡averigua posicion del cursor de texto 
DEC L ¡convierte las coordnadas logicas 
DEC H ta fisicas y averigua la direccion 
CALL HECIA icorrespondiente de la memoria 
JR — MFUT2 ide pantalla 
врит?: CAII #RRCA javerigua coordenadas dal eurent grafica 
OR А iborra el acarreo 
RR H ¡convierte coord. Y de "usuario" 
RR b. ja coord. Y de "base" 
HEEL javerigua el modo de pantalla 
AF recupera 2-modo 
AF iw Та vuslue a nreservar 
^ ¡prueba si ев O (moda 2) 
Z.PIXEL 181 es modo 2, salta 
B,A isi по, pasa 2-modo a E 
¡borra el acarreo 
¿convierte coord. X de "usuario" a 
соога. X de "base" 
FUCLEZ 
HECID ¡calcula direcc, pixel en pantalla 
AF ¡recupera 2-modo 
inecupera по. de caracteres 
jsalva no. de caracteres 
¡salva 2-modo 
japunta al caracter 


icarga en С 2-modo 


ile suma 3 


(Continúa) 
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BLA ipasa 2-modo+3 a B 
AC ¡recupera 2-mada 
HL ipreserva direccion del pixel 
DE, (DIRDAT) ¡DE=HA67C principio datos 

ide caracter 


BUCLES: ¡calcula direccion en que se halla 


ipasa direccion a DE 
¡recupera direccion de pixel 
AA ¡duplica Z-mudu мене calculer el ancho 
NZ, ANCHO idel caracter.Gi es modo 2, ancho=i 
A 


ANCHO: в,а jancho de caracter а В 
COLUMN: BC ipreserva ancho y 2-тойо 
HL ipreserva direccion pixel 
р, нов jinicializa contador 
BUCLE: А, (85005) icarga el modo de impresion 
iprueba si es cero (transparente) 


iprueba si es uno (XOR) 
151 no, es modo normal 


jcoge el byte del caracter 


JR 
TRANSF: ¡carga primer byte del caracter 
ізі єз cero, pasa а NORNZ 


мача! ty жі та, а MQRMAL 
морков; A, (DE) ¡carga byte del caracter 
д (HL? $XOR con el de la pantalla 
NORMAL: (HIJA jenvía byte a la pantalla 
нокиг: нвс26 ¡calcula direccion byte inferior de 
; Па pantalla 
DE tapunta al siguiente byte del caracter 
BUCLE4 jrepite para los В bytes 
HL irecupera direccion esquina superior 
del caracter 
нвсго jtalcula direcc. siguiente columna 
вс ¡recupera ancho del caracter 
COLUMN. irenite hasta completar el caracter 
АЕ jrecupera 2-modo 
вс згесирега no. de caracteres 
OTRO ¡repite para todos los caracteres 
ivuelve al BASIC 


10 'demo ......... parte 1 
20 hzHIMEM FOR h=0 TO 640 STEP 8 
30 hzh-44 МОЧЕ n,200:!GPUT,O, 4 
40 MEMORY (h-1) GOSUB 140 

50 FOR n=O TO 15:READ a:POKE h*n,a:NEXT 1GPUT,O, 1: IGFUT, 2,3 
60 FOR n=14 TO 31:POKE h*n,O:MEXT GOSUB 140 

70 FOR п=52 TO SS:READ a:POKE h*n,a:NEXT ¿GPUT,2,3 

80 FOR n=56 TO &3:POKE h*n,O:NEXT NEXT 

90 DATA 48,115,247,247,243,240,112,48 100 FOR n=0 TO 400 STEP 2 
100 DATA 192,224,248,248,240,240,224,192 110 MOVE 300,n: !GFUT,O 
110 DATA 0,16,48,48,48,48,16,0 120 GOSUB 140: !GPUT,O 
120 DATA 240,240,240,240,243,242,247,243 130 NEXT:GOTG 20 

130 DATA 0,125,192,1?2,200,200,120,0 140 FOR z-0 TO 30;MEXP 
150 RETURN 
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EMPEZAMOS A POTENCIAR TU AMSTRAD 


NUEVO INTERFACE RS232 


Permite comunicar los ordenadores Amstrad | 
CPC 464, CPC 664 y CPC 6128, con impresoras y plotters 
con entrada serie, modems y otros ordenadores 


CARACTERISTICAS TECNICAS 
e Salida serie Н5-232С estándar 


e Software contenido en Eprom, por lo que no 
ocupa memoria del usuario. Genera comandos para | 


facilitar el uso desde el basic. 


TAMBIEN PERIFERICOS PARA AMSTRAD 


Es un producto desarrollado y fabricado en España por: 


мы а INGENIEROS 
PRODUCTOS DISTRIBUIDOS: LSB, S.A. 
Sánchez Pacheco, 78 - 28002 MADRID - TEL: 413 92 68 


COMPRESOR 


CONSIGA MAS DE SU AMSTRAD COMPRIMIENDO LOS DATOS 


I problema de salvar un volcado de 
pantalla en el CPC-464 estriba en que 
requiere 16 K de memoria para salvar 
cualquier tipo de imagen, tanto texto 
сото texto y gráficos mezclados. Con 
un cassette el problema es la cantidad | 
de tiempo que lleva cargar de nuevo la | 
pantalla en memoria, aun cuando la 
velocidad de cassette es muy razona- | 
ble si la comparamos con la de otros 
micros. La velocidad no es problema si 
posee ип sistema de disco, pero con 
16 К cada vez, su disco no tardará en 
llenarse. 

COMPRESOR es un programa en 
código máquina diseñado para reducir 
la cantidad de memoria necesaria para 
albergar toda la información requerida 
para reproducir la imagen original. 
Esto se realiza en tres pasos: 

1. Los valores actuales del MODO, 
OFFSET DE PANTALLA, COLOR DE 
BORDE y COLORES DE TINTAS se 
copian en cinta. A ser posible es pre- 
ferible asegurarse de: que el OFFSET 


| fers que se van a utilizar inicializándo- 


DE PANTALLA es cero (ejecutando un 
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comando MODE), o puede encontrar- 
se una pequeña parte del display (una 
línea) diferente de cuando la salvó. 

2. Las 200 líneas horizontales se 
comparan para ver si algunas coin- 
сідеп. 


3. Las 80 posiciones de memoria 
para cada una de las 200 lineas se ins- 
peccionan para ver 5! existe alguna se- 
cuencia de números repetida. 

Los tres programas que se muestran 
en los listados 1, 2 у 3 funcionan de la 
siguiente manera: 


Listado 1: Programa Compresor 


Este es el programa que realiza todo 
el trabajo duro de verificar y comprimir. 


La línea 10 fija la variable del sistema 
MEMORY a 5000 hexadecimal, para 
habilitar suficiente espacio para los da- 
tos comprimidos que se almacenan 
desde 9000 (Нех.) hacia abajo. Es ро- 
sible que los datos no alcancen las po- 
Siciones cercanas а 5000 Н pero es 
necesaria esta previsión por si lo hi 
ran. El programa en código máquina 
se encuentra a partir de 9030 Н. Las 
posiciones de memoria entro 9000 H y 
9030 H se utilizan para almacenar la 
información sobre el Modo y los colo- | 
res de Borde y de las Tintas. El pro- 
grama en código máquina está dividi- 
do en nueve secciones, lo cual le faci- 
litará el trabajo de teclearlo. Cada зе: 
ción tiene también un número de veri- 
ficación para asegurarse de que los 
DATAS son correctos. бі эс introduco 
algún DATA equivocado el programa 
BASIC le dirá en qué sección está el 
error. 

La sección 1 limpia los diversos buf- 


los con ceros. La sección 2 comprue- | 
ba las 16000 posiciones de memoria 
para descubrir qué números se ет- 
plean cn la pantalla. Esto se consigue 
inicializando a cero un bloque de 256 


bytes de memoria y usando el número 
de la pantalla como el byte menos sig- 
nificativo de la dirección del bloque. А! 
final de la comprobación, todos los nú- 
meros del bloque que permanezcan a 
сего son por lo tanto los no utilizados 
en la pantalla. 

1a sección 3 inspecciona este blo- 
que para contar cuántos números li- 
bres hay disponibles. El motivo de todo 
esto es que el programa COMPRE- 
SOR necesita dos números, que utili- 
za como «marcadores», para señalizar 
las líneas que son iguales y las se- 
cuencias de números que son iguales. 
Obviamente si todos los 256 números 
de 0 bits se utilizan en la pantalla no 
hay posibilidad de utilizar ninguno 
como marcador. 

Casi la única posibilidad de que esto 
ocurra es si usted pokea deliberada- 
mente los 256 números en la memoria 
de pantalla. Incluso con los dibujos 
más complejos, existen normalmente 
algunas docenas de números utiliza- 


| bles. Si no se puede conseguir ningún 


marcador, el programa retoma al BA- 
SIC, continuando si no con la sec- 
ción 4. 

La sección 4 produce en primer lu- 
gar un ВЕЕР para intormarle de que 
dispone de dos marcadores. Estos se 
encuentran en las posiciones de me- 
moria 9001 H y 9002 H. 

A continuacion, la sección 5 recoge 


| los valores actuales del OFFSET DE 


PANTALLA, MODO, COLOR DE BOR- 
DE y COLORES DE TINTAS, y los al- 
тасепа entre 9004 H y 902 CH 

Las secciones 6 y 7 crean una pare- 
ja de «Bloques» que contienen los da- 
tos auxiliares para la inspección de las 
líneas de la pantalla. 

La sección 8 compara las 200 líneas 
de pantalla para ver si algunas son 
iguales. Las líneas que sean iguales 
utilizarán sólo dos bytes: el número 
«marcador» seguido por el número de 
la línea similar. 


A FONDO 


JE PANTALLAS 


La sección 9 comprobará a conti- 
| nuación cada línea individual де 80 
! bytes (а no ser que comience con el 
marcador “igual que") y buscará cual- 
quier repetición de números. Si hay 
más de tres números consecutivos 
igualos se representan como: 
Segundo "número marcador". 
Cantidad de números iguales. 
Valor del número que se repite. 


LISTADO 1: PROGRAMA COMPRESOR 


10 MEMORY «5000; роз1с10п< 2030 ; Ев< "ЕРКОК 
20 вовия 500: 1- suma<>1528 THEN PRINT Е 
30 Gosus 500: IF sumac21320 THEM PRINT E 
4 Gosus 500: ТЕ сцма< 2468 THEN PRINT E 
En aus 500: ТЕ suma451831 THEN PRINT E 


Бан 
80 G0SUB 500:ІҒ sumat25360 THEN FRINT E 
$;'5" 

70 GOSUB 500:1Е suma<>1611 THEN PRINT Е 
арна" 

80 GOSUB 500:1Ғ suma<>806 THEN PRINT ЕФ 
Bes 

100 GOSUB 500:1Е sumac 10394 THEN PRINT 
E$; "6" 

120 GOSUB 500:1F suma<>13339 THEN PRINT 
ЕФ; "9" 


199 END: 'X33OOOOOOOOOHOOOHOOO)HOOOIO!OUIUOH/(E 

FORA 

500 suma=0:codigo$="":READ codigos 

510 WHILE codigo$<>"-1":numero=VAL("Lk'"+c 

odigo$) 

520 POKE posicion, humero!posicion=posici 

on+i 

550 suma=suma+numero¡READ codigos: WEND:R 

ETURN 

999 END: ЕКЕ 

ORO 

1600 ' LXXOXOUXXXXXINICIALIZA todos los B 

ПЕРЕРВ а ZERO AN 

1610 DATA 21,0,90,38,0,77,23,77,23,77,1, 

9,4,21,0,93,36,0,23,b,78,b51,20, £8, - 1 
1020 a= 

OOO "ОКЖЕКУЖУХЖКККХКХ BUSCA los NUMEROS 
LIBRES ЖӘЕ 

2010 DATA 1,0,40,21,0,c0,16,93,78,54,12, 

23,b,78,b1,20,f7,-1 

520. 7 

3000 'SIJIOUOOOO00 X099. RETORNA si hay p 

ocos PUNTEROS ROO 

3010 DATA 16,0,21,44,9Л,4,44,7е,4г,0,20, 

1,14,25,10,Ғ2,2а,4е,0,с8,4е,1,-8, 

3020 '- z^ - > 


4000 TARA PASA los MARCADOR 
ES al BUFFER..9001/3 RRA 
3016 DATA 3e,7,cd,5a,bb,21,1,93,6,2, 11,1 
,99,7&,fe,0,90,5,74,12, 15,5, 28, 3, 23 
4020 DATA 18,42,-1 


Como se utilizan tres bytes, sólo me- 
rece la pena hacerlo si hay una repe- 
tición de más de tres números. Por 
ejemplo, una línea completa de 80 nú- 
meros iguales —diaamos 99— se 
comprimiría como 12 80 99, suponien- 
do que 12 representa al segundo mar- 
cador. 

Esta sección también almacena es- 
los números y marcadores desde 
9000 H hacia abajo. La dirección de la 
última posición de memoria utilizada 
se almacena en 9008/9 H para permi- 
tir el cálculo de la longitud del fichero. 
comprimido. Como bien puede obser- 
var, el programa ha de realizar mucho 
trabajo, motivo por el cual se utiliza el 
código máquina, 


Listado 2: Programa Descompresor 


Comparado con el programa para 
comprimir los datos de la pantalla, el 
programa para descomprimir estos da- 
tos es relativamente simple. El MODO, 
OFFSET DE PANTALLA y COLORES 
DE TINTAS se fijan primero. Entonces 
se inspeccionan los números almace- 
nados desde 9000 H hacia abajo. Si se 
encuentra un marcador se ejecuta la 
acción correspondiente con los núme- 
ros siguientes; en caso contrario el nú- 
mero es copiado en la memoria de la 
pantalla. El programa en código má- 
quina del listado 2 se almacena a par- 
tir de 9200 H. 


Listado 3 


Este programa se ha diseñado para 
utilizarlo como una subrutina para cal- 
cular la longitud del fichero comprimi- 
do, y para salvarlo a cinta como expli- 
caremos brevemente. 


Utilización de los 
programas 


Teclee el listado 1 y cuando el pro- 
grama funcione sin errores en los da- 
tas sálvelo en cinta. Ejecute el progra- 
ma BASIC que pokeará el código má- 
quina en memoria. El programa BASIC 
puede ser borrado con el comando 
NEW, ya que no se le necesitará. Es 
Interesante, sin embargo, conservar 
Una copia de seguridad en cinta. 


Teclee el listado 2, sálvelo, ejecúte- 
lo y bórrelo (NEW). Ahora ya está listo 
para ver si funciona el programa, 
Ajuste el OFFSET a cero tecleando 
MODE 0, MODE 1 о MODE 2. A con- 
tinuación escriba o dibuje algo en la 
pantalla, cuidando de no provocar un 
SCROLL de pantalla, ya que esto cam- 
Напа el actual valor 0 del OFFSET. 
Para salvar el dibujo de la pantalla 
como fichero comprimido teclee 
CALL 89030: si todo va bien escucha- 
rá un BEEP y aparecerá el mensaje 
READY pasados de uno a diez segun 
dos, dependiendo de la complejidad de 
la pantalla. 


5000 AA COPIA MODO, OFFS 
ET Y COLORES ЖЖК 
5010 DATA cd,b,bc,22,5,90,21,0,0,cd, 5, bc 
,€cd,11,bc,32,4,90,21,a, 70, e5,cd 

5020 DATA 3b,bc,e1,70,23,71,23, 3e, 10, fS, 
e5,cd,35,bc, el, £1,790,23,71, 23, 3d 

5030 DATA fe,0,20,f0,-1 
5040 '- 


4000 "ежкукижинкижиииии CREA BLOQUE 400 
de MEMORIA DE PANTALLA ЖӘЕ 

6010 DATA 6,c8,11,0,94,21,0.C0, 7d, 12, 13, 
2c,12,13,cd,26,bc, 10, £5,-1 


Para verificar el correcto tunciona- 
miento del programa decodificador (lis 
tado 2) cambie primero el MODO y el 
BORDE y las TINTAS si lo desea, o 
simplemente borre la pantalla, y escri- у cem 


ЕО 8000 ӘН COMPARA LAS LINEA 
Si todo va bien, su dibujo original E 
aparecerá en un segundo. Si el progra- 8010 DATA 21,0,95,е5,21,1,95,49,21,0, 94, 
та no funciona correctamente veriti- 1d,21,2,94,dd,46,1,dd, 4e, 0, fd, 56,1 
que todos los datas en los listados 8020 DATA +d,5e,0,7d,be,20,11,e5,c5,el,6 
para comprobar que los ha introducido ,90,1a,be,20,9,13,23,10, £8, 01, c1,71 
correctamente. Las sumas de verifica- 8030 DATA c5,e5,e1,7d,fe,c7,20,16,el,7d, 
ción no son infalibles; después de fe,có,28,17,dd,23,dd, 23, 22, 7d, be, 20 
todo, pudo introducir dos valores inter- 8040 DATA f2,e5,dd,eS,fd,e1,18,c2, fd, 25, 
cambiados. La suma será la misma, £d,23,23,18,DD,-1 
pero los dos valores intercambiados en 8050 '- 
el programa en código máquina produ- roc 
cirán el desastre. Cuando los dos pro- 9000 "ЖҰ COMPRIME LAS LINE 
gramas funcionen, introduzca el lista- AS XXXXX XXX 3-XX ХУ ХХХ. 
do 3 y salve el fichero comprimido a 9010 DATA 11,0,90,3e,1,12,1b,1,0,c8,dd,2 
cinta (o disco). Si solamente está 1,0,94,*d,21,0,93,d5,dd, 66, 1, dd, óe, O 
creando y salvando dibujos a cinta en- 9020 DATA fd,7e,0,b9,20,62,c5,1,50,0,11, 
tonces na Bs pecgsafa-que wi progra: 0,96, ed, bO, 32,1,90,32,59,96, ci,di,cs 
ma del listado 2 este en memoria. Aná- 9030 DATA 21, о, de, 3e,0, 32, 7,90,6, 1 178,23 
logamente, si está cargando los fiche- 144,33, 1,90, Ба: 28,32,79,be, 20, A. 4 
set memora pera deyolvarios аца $040 DATA 18,41,44,78,Ғ2,5,28,15,4е,2,28 
pantalla, no es necesario que el pro- ,11,4e,1,28,d,3a, 2,90, 12, 1b, 78,12,1b 
grama del listado 1 esté en memoria 9050 DATA 79,12,1D,18,2,79,12, 1b, 10, Fc, 3 
Ambos pueden funcionar perfectamen- 2,7,90, 46,63, 28, c, 18, c5, 18, de аах 
Jetanic [Unos о варагедоз, вао 9050 DATA 32,7,70,79,18,cd,c1,18,b,d1,3a 
mur = ,1,90,12, 1b, £d,7e,0, 12, 1b, dd, 23, dd, 23 
9070 DATA £d,73,c,10,df,ed,53,8,90,c9,- 


2000 ЭЖЖ CREA BLOGUE 200 
ddx3xxxexdpee1p|Badd|j]e(dmYeOee!Óeereeeeeeee 
7010 DATA 21,0, 284 6,C8,73,23,10, fcq -1 


Supongamos que usted tiene un 
programa en BASIC para crear hermo- 
sos dibujos que desea salvar en forma 
comprimida. Esto es lo que neccesita- 
rá hacer: 


LISTADO 2: PROGRAMA DESCOMPRESOR 


10 MEMORY &SOGO0:posicion-&k9?200 

1000 suma-O:codigo$-"":;READ codigos 
1010 WHILE codigo$<>"-1":numero=VAL ("Ь"+ 
codigos) 

1020 POKE posicion,numero:posicion-posic 
ionti 

1030 suma-sumatnumero:READ codigo*:WEND 


En primer lugar, cargue el listado 1 
y ejecútelo para cargar el programa en 
código máquina en memoria. Cargue 
su programa BASIC para crear los di- 
bujos y a continuación mezcle (MER- 
GE) la subrutina del listado 3 con su 


LISTADO 2: PROGRAMA DESCOMPRESOR 


1040 ТЕ suma<>15781 THEN PRINT "Error en 
los DATAS !“: ЕМ 
13000 "ННН НЕННЕ DESCOMPRIME LO 
S DATAS (Call &9200) ХЕҰ 
13010 DATA 3a,9,90,cd,e,br,21,0,0,cd,5,b 
£,21,8,90,46,23,4e,23,e5,cd,38,bc,e1 
13020 DATA 32,10,15,46,23,9e,23,e5,cd,32 
іӛ5с)е1,71,24,ҰҒе,0,20,Ғ40,21,%ҰҒ,8Ғ,а4,21 
15030 DATA 0,90,11,0,с0,е,с8,45,6,50,7е, 
44,Бг,1,28,54,44,Бе,2,20,18,2Ь,с5,4е,2Ь 
13040 DATA 7e,12,13,5,d,79,16,0,20, 6,78 
;E1,47,2b, £e,0,20,d£,18,5, 12, 13, 2b, 10 
13050 DATA 48,d1,d,79,fe,0,28,25,85,62,6 
Ь,с4,26,6с,54,59,21,18,с5,с5,2Ь,46,4,65 
13050 DATA 21,0,c0,cd,26,bc,10,fb,cd,29, 
be,1,50,0,84,b0,e1,2b,c1,18,44,2a,5,90 
13070 DATA с4,5,Бс,с?,-1 


—LISTADO 3— 


10000 “%%% CALCULA DIRECCION DE COMIENZO 
Y LONGITUD DE UN FICHERO COMPRIMIDO XXX 
10010 15БЕРЕЕК (9008) : msb=PEEK (49009) :һе 
sultado=msbX256+1sb 

10020 totalz35912-resultado:PRINT"Memori 
a utilizada -"jtotal 

10030 PRINT"Pulse «ENTER» para SALVAR a 

CINTA" 

10040 PRINT"Cualquier otra tecla para FI 
м" 

10050 WHILE teclas="";teclas=INKEYS: WEND 
10060 IF tecla$<>CHR$(13) THEN END 

10070 LINE INPUT"Introduzca el nombre de 
1 fichero "¡nombres 

10080 SAVE"! "+phombre$, E, носи 1 Е а4с, total 


ea ШЕ А 
1а Н 
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programa en BASIC. Inserte la siguien- 
te línea en esta subrutina: 

10005 CALL 49030 

Cuando haya creado su dibujo en- 
tonces GOSUB 10000, introduzca el 
nombre que desee darle al dibujo y el 
fichero se salvará a cinta como fichero 
binario. Repita este proceso si necesi- 
ta salvar mas dibujos. 

Para recuperar los dibujus cargue el 
Programa del listado 2 y ejecútelo. Si 
ha salvado cinco dibujos en cinta en- 
tonces éstos pueden ser recuperados 
y mostrados uno tras otro utilizando un 
programa como este: 

10 FOR PANTALLA=1 TO 5 

20 LOAD “!" 

30 CALL 89200 

40 NEXT PANTALLA 

Cada dibujo será cargado y mostra- 
do en el monitor. Ahora bien, ¿cuánta 
memoria se ahorra? 

Como media. el ahorro es de un 
50 %, lo cual, en términos de ordena- 
dor es una economía considerable. Di- 
bujos muy simples pueden utilizar sélo 
1 К de memoria mientras que dibujos 
complejos pueden necesitar 12К о 
más. Muchos de mis dibujos utilizan 
aproximadamente 8 K así que podrá 
albergar el doble de dibujos en su cin- 
ta o disco, y necesitará la mitad del 
tiempo habitual para cargarlos. 

En algunos casos su programa para 
crear dibujos será mucho más peque- 
ño que el fichero comprimido. Sin em- 
bargo, si la rutina de dibujo es del tipo 
complejo de tres dimensiones, utilizan- 
do muchas fórmulas matemáticas, el 
tiempo necesario para realizar el dibu- 
jo puede ser considerable (a veces һо 
та) a pesar de que el CPC-464 no es 
perezoso. Este es el tipo de situacio- 
nes en que la técnica de compresión 
alcanza su máxima utilidad. 

Angel ZARAZAGA 


[— — NUEVOS PROGRAMAS — E 


SS ES 


ARGO NAVIS 


JUMP JET 


ODDJOB 


OTROS PROGRAMAS EN STOCK DRAUGHTSMAN 
р ENVIENOS A MICROBYTE 
P.? Castellana, 179, 1.2 - 28045 Madrid 
eme > 
Apelidos 
есін -1 
қамды 
бе такса 
ENVIOS GRATIS 
ПЕТ) eTe [ЕСТЕ тоа. 
= 
CORS = 
PRECIO TOTAL PESETAS 
Yep ша олмай Г] 
pu a | 
— — | 
Pedidos ро lro 91 - 44254 33/44 || 


aco 


290 JR N2,tintas isiguiente piuma hasta 16 
300 LD HL, #SFFF ¡principio del fichero canprinido 

310 LD 1X,49009 ¿direccion de los marcadores 

320 LD DE,HCODO ¡comienzo de la memoria de pantalla 
336 Lo с,нев ¡carga no. de lineas en la pantalla 
340 conti DE ipreservs direccion de pantalla 

350 в, BSO ¡carga по. de bytes por linea 

349 mark?: LD ALL) ¡coge dato del fichero 

370 Св (IXI) isi es ei primer marcador salta a la 
380 IR — 2.manlel jrutina correspondiente 

лоп с (xe) isi no es el segundo marcador salta 
400 IR Ма, Imp ja la rutina de impresion en pantalla 


3 rutina SEGUNDO MARCADOR 


mank2: 


contadores de bytes y lineas 
numero de bytas repetidos 


Valor del byte o repetir 
arga byte en pantalla 


repite: 


500 ТАС DE ¡siguiente posicion de pantalla 
510 DEC В . contador an. da hykes/linea 
320 DEC С ecrementa contador de bytes 

522 LD jrepíte el numero de veces necesario 


¡final de linea? 
jrecupera contador de lineas 


(€) 


ізі no, siguiente dato del fichero 
18 — Nz,manh? isi es el final de línea, calcula 
IR otra ila direccion de la siguiente 


rutina de IMPRESION DIRECTA 


(DEJA timprine el byte en pantalla 
Inc DE isisuiente direccion de pantalla 
isiguiente dato del fichero 

¡comprueba si es un marcador 

irecupera direccion linea de pantalla 
jactualiza contador lineas 

isi no quedan lineas, fin del programa 


datos dal fichero 


preserva puntano 


¡calcula direccion siguiente linea 


irecupera puntero datos fichero 
ieentinua 


i rutina PRIMER MARCADOR 


2 manki: H вс isalva contadores de bytes y lineas 


HL 
B, (HL) ісағда no. de la limes igual 

E 

HL ¡preserva puntero datos fichero 


HL, всо00: busca linea a copian 


#2026 jSCR NEXT LINE 
bucle 

WBOZ? iSCR PREV LINE 

BC, #0050 ¿copia la linea de (HL) a (DE) 


jrecupera puntero fichero 
¡siguiente dato del fichero 
recupere contadores bytes y lineas 


SALIDA DEL PROGRAMA 


HL, (3005) ¡carga OFFSET de pantalla 
1050 CALL WBCOS fija OFFSET de pantalla 
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ШЕ 


AMSTRAD USER por un año (12 números) 


NOMBRE 
шити 
CALLE, AVDA., PLAZA 
ЕРЕІСТТІРІС 0 Шш шш шї AE] 
LOCALIDAD CODIGO POSTAL 
METERS PEE 1м) 
FORMA DE PAGO: ГІ CONTRA REEMBOLSO 

О POR GIRO POSTAL 

C) РОВ TALON DE BANCO (J) 

(1 CON TARJETA DE CREDITO 


1? APELLIDO 


Núm. de mi tarjeta [TTTT 


ПСОМЅІрЕКЕМЕ SUSCRIPTOR DE LA REVISTA 


Recibiré en mi domicilio, como obsequio especial, dos programas en cassette 


СГІГІТТІТІИ 


* Precio normal en quiosco: 
3.600 ptas. anuales 


Carguen 3.100 plas, а mi tarjeta: AMERICAN EXPRESS C 
ed a К ав А 14 а Во BD E E E G 


22 APELLIDO 


T с AD-MFOA! 19.500 
A фазана (ортан 
AD-CG062 P.V.P. 19.500 
PROVINCIA 
ШЕГЕРІЛЕ 1 


AD-CG063 P.V.P. 24.500 


PRECIO SUSCRIPCION 


3.100 PTAS.* 


AD-AFOS9 Р.У.Р. 19.500. 


оз con totalización de compras, 
y albaranes, (Dos unidades de 


VISA O 


Fecha de caducidad 


Firma 


() Dirigir a INDESCOMP, 5. А. 


AD-AF028 P. 


ALNACEN-FACTURACION 15.500. 


Control de entradas y salidas de inventarios con totalización de compras y 
ventas. Las facturas descuentan la mercancía del almacén automáticamente, 
Ente recibos, tacturas y albaranas, 

(Una unidad de disco). 


RPA CLIENTES-PROVEEDORES- 
FACTURACION-MAILING AD-CPOT1 


Le permite tener a sus clientes y proveedores clasificados por sectores, sus 
totales facturados y su IVA, Totalización parcial y total. Permitehacer mailina y 
41 control y seguimiento de la cartera de sus clientes. ] 


P.N.P. 15509 


PRA PROCETEXT AD-PTOG1  P.V.P. 9.500 


Procesador de textos y mailing. Incluye márgenes, impresion, tabuladores, 
acentos, eto, 


AD-AMO92 ғ. 


APA AGENDA ROBOT 500 


Integrado рог cuatro subprogramas: Agenda-Ficherc de clientes, Dietario, 
Calculadora y Base de Datos. 


CONTABILIDAD GENERAL II Ар.С6027 Р.М.Р. 15.500 


Contatilidad general española, según el plan contable. Incluye: Anotación 
de asientos, Madificación de apuntea, Asientos externos. Libro diario, Mayor, 
Balance. Fin de periodo, Fin de ejercicio. Con cálculos matemáticos realizados 
en onsamblador que garantizan alla precisión 


“AMSTRAD 6128” 
Serie Profesional 2000. CPM/Plus 


ВРА MULTI AGENDA ROBOT 
Realizada en Pascal. 


AD-MRO72 P.V.P. 15.500 


RPA MULTIBASE 3 АО-МВ046 P.V.P. 19.500 


Permite hacer gráficos de curva, tarta е histogramas, lineal y en tres di- 
mensiones. 


ЯРА FACTURACION 61: A0 9.500. 


Incluye apuntes de contabilidad, formas 48 pago y diversas opciones се 
impresora: Factura, Albarán o Recibo Con totalización parcial o general. In- 
cluye IVA. (Opcionalmente dos unidades de disco). 


RPA NOMINAS AD-NO045 Р.М. 19.500 
Comprende impresos ТСТ, TO2, apuntes de contabilidad e informes. 


RDA GESTION DE EMPRESA AD-GE030 PVP 85000 


AD-CP088_ P.V.P. 15.500 


A-5 


6128” 
PM/Plus 


APA GEOGRAFIA DE ESPAÑA AD-GS051 PAP. 3500 
ПРА GEOGRAFIA (UNIVERSAL д0-60074 РУР 9500 
APA CLIMATOLOGIA AD-CLO73 РМР. 9500 
RPA DEMOGRAFÍA AD-DE075 РУР, 9500 
RPA CUERPO HUMANO AD-CHOS2 РУР, 9500 
НРА PLANETARIO AD-PLO7O РУР. 9500 
ВРА TEOREMAS GEOMETRICOS AD-1G077 РУР 9500 


“AMSTRAD 6128” 
Sectores Profesionales. CPM/Plus 


ARTICULO. REF. 
RPA MEDICO-CLINICO-FARMACOS AD-CF028 
RPA MEDICO-CLINICO-DENTISTA AD-GE049 
APA CALCULO DE ESTRUCTURAS AD-CE078 
RPA VIDEO CLUB AD-YC029 


CPM/Plus 


APA ALMACEN-FACTURACION AD-AFOS6 24500 
RPA CONTABILIDAD GENERAL 5 AD-GE0 24200 
ВРА GESTION DE EMPRESA AD-GEOS7 76500 
ВРА MULTI AGENDA ROBOT AD-MROBS 19500 
APA NOMINAS AD-NO052 28500 
НРА MULTIBASE 3 АО-МВ060 28500 
RPA FACTURACIÓN 8256 AD-FA053 28500 
RPA MASTER FILE AD-MFOB4 28500 
RPA VIDEO CLUB. AD-YG000 35.500 
RPA GRAFICOS DE GESTION AD-FGOS! 19500 
BASE DE DATOS AD-EDOBO 24500 
"RPA ELEPHANT DATA RASE" 

APA ADMINISTRACION DE FINCAS AD-ADORY 26500 
ЯРА PROJECT PLANNING AD-PP082 19500 
RPA BRAINSTORM PLUS AD-BSOBS 19.500 
НРА GLIENTES*PROVEEOORES-FAOT, AD-OP004 24500 


MAILING 


Los programas para el Amstrad 8256 estarán disponibles en la ùltima sema- 
па de enero. Sus caracteristicas serán similares a los del Amstrd 6128, соп 
mayor capacidad de datos y detinicién de pantalla Todos ellos funcionarán 
соп un sistema de protección (un Interfaz) denominado "Interproc" 


Integración de los programas; Contabilidad General, Nóminas, Facturación, 
Clientes y Proveedores. (Dos unidades de disco). 


Galileo, 25 - Entreplanta A - 28015-Madrid 
Те. 447 97 51 / 447 98 09 


мо 
NECESITA 
SELLO 


А Frunqueor 
en destino 


RESPLIESTA COMERCIAL 
Autorización М? 7000 
BOC. № 10 de 30-8-85 


S.A 


Departamento de Publicaciones 


Apartado de Correos 267 F.D. 
MADRID 


Meymarg? i es el final de linea, calcula 


atra ila direccion de la siguiente 


rutina de IMPRESION DIRECTA 


(ЗЕ) ,А iimprime el byte en pantalia 

DE isuiente dipección de pantalla 

HL ¿siguiente dato del fichero 

mark? omprusba si es Un marcador 
Irecupera direccion linea de pantalla 
¡actualiza contador lineas 
іші no quedan lineas, fin del programa 


¡preserva puntero datos del fichero 
alcula direccion siguiente linea 
ecupera puntero datos fichero 


ЕТІГІН 


rutina PRIMER MARCADOR 


isalva contadores de bytes y lineas 
carga nn. de la linoa 


ipreserva puntero datos fichero 
¡busca linea a copiar 
24 iSCR NEXT LINE 
bucie 
(02224 
EC, #0050 торға nea de (HL) a (DE) 
нш jrecupera puntero fichero 
HL isiguiente dato del fichero 


вс recupera contadores bytes y lineas 
etre 


PROGRANA 


jtarga OFFSET «е pantalla 
jfija OFFSET de pantalla 
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Software & Hardware 


“AMSTRAD 664” 
Serie П. СРМ 2.2 


ЋРА BASE DE DATOS А0:80007 P. 
Programa muy versatil, potente y de sencillo manejo, Cen opciones de 

color, modificaciones, búsqueda, inserciones, elc. Disoone de una completi- 

sima solida por impresora 

ВРА MASTER BASE AD-MAO7S_ РУР. 12500 
Base de Dalos realizada еп PASCAL, arboles, busqueda aleatoria. 

AD-HCO24_ рур. 12.500 


Hoja de cálculo raelizada en Pascal, le permite hacer cálculos matemáticos, 
así como gráficos. Es ideal pare cálculos económicos y financióros. 


RPA FACTURACIÓN 664 AD-FA070 РМР. 12.500 


Permite realizar facturas, almacanarias y después modificarlas. Tratamiento: 
de МА. Totalizaciones generales y parciales. Genera recibos, albaranes y tac- 
turas. Salida рог impresora muy completa 


ALNACEN-FACTURACION AD-AF025 Р.М.Р. 15,500 


Control de entrades y salidas de inventarios con totalización de compras y 
ventas, Las facturas descuentan la mercancia del almacen automáticamente 
Emite recibos, facturas y albaranes. 

(Una unidad de disco) 


RPA CLIENTES-PROVEEDORES- 
FACTURACION-MAILING AD-CPOTi P.V.P. 15.500 


Le permite tener а sus clientes y proveedores clasificados por sectores, sus 
чеш» facturados y su IVA Totalización parcial y total. Permite hacer mailing v. 
sl control y seguimiento de la cartera de sus clientes. ' 


PRA РНОСЕТЕХТ AD-PTOG1_ P.V.P. 8500 
Procesador de textos y malling. Incluye márgenes, imprasión, tabuladores, 
acentos, etc. 


AD-ARODZ Р... 12.500 


APA AGENDA ROBOT 


Integrado por cuatro subprogramas: Agenda-Fichero de clientes, Dietario, 
Calculadora y Base de Datos. 


CONTABILIDAD GENERAL II AD-CGO27 P.V.P. 15.500 


Contabilidad general española, según al plan contable. Incluye: Anotación 
de зметоз, Modificación de apuntes, Asiento» externos, Libra diario, Mayor, 
Balance, Fin de periodo, Fin de ejercicio. Con cálculos matemáticos realizados 
en ensamblador que garantizan alla precisión 


“AMSTRAD 6128” 
Serie Profesional 2000. CPM/Plus 


ВРА MULTI AGENDA ROBOT 
Realizada en Pascal. 


AD-MRO72_P.V.P. 15.500 


APA MULTIBASE 3 AD-MB04& РУР. 19.500 
Permite hacer gráficos de curva, tarta е histogramas, linea! y en tres di- 

 mensianes. 

RPA FACTURACIÓN 6128 РМР. 19.500 


Incluve apuntes de contabilidad. formas de pago y diversas opciones се 
impresors: Factura, Albarán o Recibo, Con totalización parcial o general. In- 
cluye IVA. (Opcionalmente dos unidadas de disco). 


AD-FAO47 


RPA NOMINAS. AD-NOO4S  P.V.P. 19,500 
Comprende impresos ТС, TO2, apuntes de contabilidad в informes, 


BBA GESTION DE EMPRESA AD-GEc30 рур 55000 


RPA MASTER FILE AD-MF048 РМР. 19.500 


Fichero maestro aleatoria сол opción de impresora aleatoria. (Opcionat- 
menle con dos unidades de disco) 


RPA CONTABILIDAD GENERAL Ill AD-CG062 рур. 19.500 
Incluye masas patrimoniales. 

APA CONTABILIDAD GENERAL IV AD-CG063 PUD. 24500 
Incluye analítica y previsión de cobros. 

ВРА ALMACEN-FACTURACION AD-AFOG9 PVP. 19.500 


Control de entradas y salidas de inventarios con totalización de compras, 
ventas y existencias, Emite recibos. facturas y albaranes, [Dos Unidades de 
disco) 


ВРА CLIENTES-PROVEEDORES- 


TEACTURACION MAILING AD-CP088 РУР, 15.500 
AMSTRAD 6128 
Educativos. CPM/Plus 
APA GEOGRAFIA DE ESPAÑA AD-GS051 РУР 3500 
RFA CLIMATOLOGIA AD-CL073 РУР, 9500 
ПРА DEMOGRAFIA AD-DEO75 Р.МР, 9.500 
RPA CUERPO HUMANO A-CHO РУР. 9500 
RPA PLANETARIO, АОРТЕ РУР. 8920 
RPA TEOREMAS GEOMETRICOS RE 


“AMSTRAD 6128” 
Sectores Profesionales. CPM/Plus 


ARTICULO REF. РУР, 
ЯРА MEDICO-CLINICO-FARMACOS AD-CF028 15.500 
RPA MEDICO-CLINICO-DENTISTA AD-CE049 15,500 
НРА CALCULO DE ESTRUCTURAS AD-GE078 12.500 
RPA VIDEO CLUB. AD-VC029 28.500 

“ » 
AMSTRAD 8256 
CPM/Plus 

RPA ALMACEN-FACTURACION АО-АЕО56 24500 
RPA CONTABILIDAD GENERAL 5 AU-GEUDS 24.500 
RPA GESTION DE EMPRESA AD-GEO57 76500 
АРА MULTI AGENDA ROBOT ADMRUsS 18:00 
ПРА NOMINAS EE 
RPA MULTIBASE 3 AD-Meoeo 2850: 
RPA FACTURACION 8256 AD-FA053 28500 
RPA MASTER FILE Армкоы 28500 
REA VOO еще ва 
RPA GRAFICOS DE GESTION AD-FG067 19500 
BASE DE DATOS AD-ED080 24500 
FAPA ELEPHANT DATA BASE" 
АРА ADMINISTRACION DE FINCAS. AD-AD081 35.500 
REA PROJECT PLANNING AD PPM 19290 
RPA BRAINSTORM PLUS AD-Dsoaa 18500 
REA CLIENTES PROVEEDORES-FACT. poe 


MAILING 


Los programas para el Amstrad 8258 estarán disponibles еп la última sema- 
па de enero. Sus caracteristicas serán similares a los del Amsted 6128, con 
mayor capacidad de datos y delinición de pantalla. Todos ellos luncionarán 
соп un sistema de protección (un Interfaz] denominado "Interproc" 


Integración de los programas: Contabilidad General, Nóminas, Facturación 
Clientes y Proveedores. [Dos unidades de disco). 


Galileo, 25 - Entreplanta A - 28015-Madrid 
Tels. 447 97 51 / 447 98 09 


Los mejores programas del mes seleccionados por 


ASIA a 


PARTICIPE, 
GANE ........ 


revista uno de estos fabulosos premios PREMIOS SORTEO 
AMSTRADIEZ 
* 1 Impresora AMSTRAD DM-1 DICIEMBRE 85 


* 5 Lotes de 3 programas IMPRESORA AMSTRAD 
en cassette ИМЕШ 


Oscar Gracia González 
Avda. de Daroca, 29-2.* 
28017 MADRID 


е Para participar solamente deberá rellenar el cupón 


j 1 us cinco programas 
adjunto con los títulos de s prog LOTES DE 3 PROGRAMAS 


favoritos en orden de preferencia y enviarlo a EN CASSETTE 


AMSTRAD USER. Enrique Monrabal Company 
С) Alvarez Sotomayor, 27-6 

е Todos los cupones recibidos antes del día 30 de ERES 

cada mes entrarán en un sorteo, José Luis Cano Cervera 

С/ González Adalid, 7-6. В 

* Alos premiados les será notificado por carta certi- 38091 MURCIA 

ficada en su domicilio. Yolanda Pellejero Cezon 


C/ Andrés Gurpide, 3, 7.* esc. 2 
50008 ZARAGOZA 


Francisco Javier López Serna 


AMSTRADIEZ MES: FEBRERO 1986 C) Doctor Zamenhof, 2-4, 6. 2.* 


08020 

Programas: ponc Sida 
Carlos Alfonso Rhodes de Diego 
Pza .de la Iglesia ,9 

Cabanillas del Campo 
(GUADALAJARA) 


Fotocopie o 
recorte y envíe este cupón a 


Eo AMSTRADIEZ 


мее Avda. del Mediterráneo, 9 
Profesión.......... e A 28007 Madrid 
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MES: FEBRERO 1986 


-AMSIRADIEZ- 


PROGRAMA 


ORDENADOR 


CINTA 
овес 


ALIEN-8 


TODOS 


DECATHLON 


CPC 464 


KNIGHT LORE 


TODOS 


FIGHTER PILOT 


TODOS 


GREMLINS 


TODOS 
=! 


EXPLODING FIST 


CPC 464 


3-0 VOICE CHESS 


TODOS 


PYJAMARAMA 


TODOS 


à 


SI SI 


9 МАМС MINER 


СРС 464 


10 [SIMULADOR DE VUELO 737 


TODOS E 
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VARIABLES DE NUESTRO 
PROGRAMA 


La siguiente rutina es una útil herramienta para la depu- 
ración de programas, ya que lista las líneas en las que he- 
mos utilizado una determinada variable BASIC 

Una (mediante MERGE) esta rutina con su programa y 
ejecútela con run 65350. También se puede utilizar como 
Una subrutina cambiando los comandos END en las líneas 
65360, 65410 y 65440 por RETUAN. 

La rutina pide el nombre de la variable y la línea por la 
que debe comenzar y acabar da inspeccionar el progra- 
та. Si no introducimos ningún valor, la búsqueda se efec- 
túa sobre todo el programa, Para cada línea en que se uti- 
liza la variable deseada obtenemos el número de línea y 
las veces que se emplea. 

El pragrama realiza primero una serie de conversiones 
para adaptar el formato de entrada a la forma de manejar 
los nombres de variables del programa BASIC, y realiza a 
continuación una búsqueda por todo el programa, Al nom- 
bre de variable que le demos se le pone a uno el bit 7 del 
último carácter, para indicar ol fin. У. M. 


350 INPUT "Hombre de la Variable 

40 IF z THEN END 

70 iF RIGHTS(228,1)="8" OR RIGHTE(2=8 

220% OR RIGHTS (228,1)="%" THEN zz*-LE 
eL 1-11:6070 ¿5740 


SITO 22%-/ЕРЕҢФ(21%):111%-10МЕК%(11%)21 
TETLEFTR(zzS.LEN(zz8)-1)*CHR$(128 OR ASC 
(RIGHTS (220,115) :z21G9LEF Té (2218,LEN (231 
+) -1реснке (126 OR ASC (RIGHTS (221%, 1))) 

45290 zrínicio!=0:224in!=65515; INPUT "Li 
Mjaziniciol: INFUT "Lin 
"gxzfin!:iIF 2241n!=0 TH 


naa da enmiansa 

ea de Finalizar: 

EN г 10!965535 

65400 72!=t170 

65410 2211=PEEK(221)+Z256XPEEK (zz! DIF 

221150 THEN PRINT "Encontrado el fin del 
programa. "¿END 

45420 EEK (22142) 425£4PEEK (22142) 

65430 ТЕ zz2'«zzinicio! THEN 22!e220+224 

16070 85410 

65440 ТЕ zz2!»z241n! THEN END 

68450 zr0!-Oizz3!"zz!«4 

65460 IF zz3!;ezz!*zzi! THEN 25490 

45470 IF CHR&(PEEK (223!) )-LEFTS (2218, 1) 

OR CHRE(PEEK(ZZS!))"LEFT(zz$,1) THEN GO 
JB 45510 

652480 zz3'"z13'*11G0TO £5450 

65490 ТЕ 1201420 THEN PRINT “En la linea 

82299 zzt-zz!*zz1'iG0TO 63410 

45510 225!m2235!:FOR 1141891 TO LEN(z218) 

65520 IF NOT (MIDS(221%,224!,1)=CHRS (FEE 

K(z23!)) OR MIDB(228,229!,1)=CHRE(PEEK(Z 

151))) THEN RETURN 

45520 z:5!=z25!+1:NEXT zzd!tzzO!ezz0!41: 

zi3!-z:3! LEM (zzi) : RETURN 


CURVAS EN TRES 
DIMENSIONES 


Este programa de 14 líneas produce algunas de las me- 
jores figuras en tres dimensiones. 

El único inconveniente es que emplea varias minutos en 
dibujar las figuras más elaboradas pero merece la pena es- 
perar. Podemos obtener efectos interesantes cambiando la 
línea 60 por: 


60 Q = (R-1)'COS(6-R) 

Y pruebe también: 

60 Q = (R-1)*SIN(— 16'R) 

En la línea 10 están definidas las variables Хз y YS que 
controlan la dofinición del dibujo; ponga simplemente un 
número menor para obtener puntos más juntos. XS = 1 y 
YS = 1 nos da la mayor definición pero emplea consecuen- 
temente mayor tiempo en realizar el dibujo. Use XS = 6 y 


YS = 6 para obtener una rápida idea de qué va a apare- 
cer con cada cambio. 


J. M. 


10 MODE 2:0RIGIM 320, 200: ха”: увч4 
20 А:320:ртаЖа: с"200 

30 FOR хта ТО 0 STEP -хзїз=х#хїр=5ӨВ(Ы-з) 
40.FOR i--p TO p STEP 6%ув 

50 rz58R(s 1X1) 7а 

50 qe(r-1) kSIN(1é-r) 

70 у-і/5ғажс 

80 IF ie-p THEN mmy:GOTO 110 

90 IF уум THEN мау: СОТО 120 

100 IF y)=n THEN GOTO 130 

110 nay 

120 PLOT -x,ytPLOT х,у 

130 МЕКТ: ЧЕХТ 

140 END 


MANEJO DIRECTO DEL CHIP 
DE SONIDO 


Muchos de los usuarios de Amstrad ya sabrán que el 
controlador de sonido que incorpora, el AY-3-8912, es un 
chip muy popular, y que se utiliza en muchos ordenado- 
res. Sin embargo, el manejo a través де! BASIC y el ope- 
rativo de ви sonida se hace por una codificación interme- 
día que dificulta el acceso directo a los registros internos. 

Aunque su programación directa puede llegar a ser te- 
diosa, nos proporciona la ventaja de poder estirar al límite 
sus posibilidades. El programa que os presentamos a con- 
tinuación crea el comando (RSX): SONIDO. Este comando 
tiene dos parámetros: registro y valor, Su cometido es muy 
sencillo, pero no será fácil de usar sin saber el cometido 
de estos registros. Los tres ejemplos que lo acompañan 
ayudarán a conseguir tres bonitos efectos sonoros siem- 
pre, claro está, que antes se haya cargado el primer lista- 
do para definir el comando. 


O.L. 
16 REM 
20 REM COMANDO !SONID0,REGISTRO,VALOR 
30 REM 
40 MEMORY 33999 
30 FOR a-34000 TO 34036 
40 READ У:РОКЕ а, х 
70 МЕХТ А 
$C CALL 34000; NEW 
Фа DATA 3 
„201, 222, 


100 DATA 78, 77, 68, 207,252, 
0,221,126,0,29,221,126,2,205,52,189,201 


REM EXPLOSION 
ISONIDO, 7, X10110111 

SONIDO, в, 31: !GON1DO, é, 120 
150NIDO, 11,4: | SONIDO, 12, 90 
¡SONIDO, 13,0 


REM DISPAROS 


20 18DNIDO,7,bX10110111 
то !SONIDO, 1SONIDO, 6,120 

40 ¡SONIDO, 11,24: SONIDO, 12,10 

50 ¡SONIDO, 13,8 

10 REM SILEIDOS 

20 !SONIDO,7,&X10111110 

30 !SONIDO,8,15 

40 FOR А=255 TO 1 STEP -1::СОМІрО,0,А:МЕ 
XT A 

50 FOR Axl TO 25 NIDO, O,A3NEXT A: SO 
NIDO, 7,255 


EL AMSTRAD ARCOIRIS 


Se puede crear un carácter multicolor en el AMSTRAD 
СРС 464 usando el modo transparente (PRINT CHR 5(22); 
CHR S(1). Fijando este modo en el ordenador e imprimien- 
do diferentes caracteres coloreados uno sobre otro, podre- 
тов crear caracteres repletos de colorido. 


5 MODE С 
6 EVHBOL А! 
10 


LOCATE ya 
FRIMT CHR 


3 


(20 
FRIMT CHAE (22 
O NEXT x 


FORMATO DE IMPRESION 
EN EL AMSTRAD 


Algunos lectores nos han escrito quejándose del forma- 
to de impresión del AMSTRAD y señalando que sí una fra- 
se va a sobrepasar el límite derecho de la pantalla, se ge- 
nera un <RETORNO DE CARRO> y la trase «запа» a la 
línea siguiente; 


10 MODE 1 
20 A $ ustring $ (22,«Х») 
90 PRINT A $; AS 


Este ejemplo nos dará al ejecutarlo dos líneas separa- 
das de A $. Sin embargo, esto no es un error del BASIC, 
sino una característica intencional, Para evitar esto, en lu- 
gar de PRINT utilice USING«&»; por ejemplo, cambie la І- 
nea 30 por: 

30 PRINT USING «&»; AS: AS 


y le imprimirá A $ dos veces en la misma linea. 
Ocurre exactamente igual con el comando LOCATE: 


30 LOCATE 30,1: PRINT A $ 
y le escribirá A$ en la siguiente línea, mientras que 
30 LOCATE 30,1: PRINT USING «&»; АЗ 


le producirá e! resultado esperado. 

A continuación ofrecemos una forma de utilizar los códi- 
gos ASCII menores de 32 directamente desde el teclado 
como caracteres, Teclee PRINT» y pulse [CTRL] y una le- 
tra y luego [ENTER]. Prueba los siguientes ejemplos: 


PRINT «[CTRL] б» - produce un pitido, 

PRINT«[CTRL] DO» - nos da el modo cero. 

PRINT «[CTRL] O3» - nos da color rojo (si estamos en 
modo cero). 


Puede intentar poner esto en un programa de esta forma: 


10 MODE O 

20 PRINT «[CTRL] O1aaaaa, O2bbbbb, ОЗссссс" 

Esle ejemplo producirá una línea multicolor de amarillo, 
суап y rojo. 


curso de programación 


LENGUAJE BASIC 


£ 


1 mes pasado acabábamos 

con un pequeño programa. 

En смс segundo capítulo 
prepararemos un nuevo 

programa con el que, por un lado. 
aprenderemos nuevas instrucciones y 
por otro entraremos en contacto con al- 
unos conceptos de programación. 
Algo que se mencionó en la primera 
parte fue que los programas se almace- 
naban en memoria. La memoria no 
sólo es el lugar donde se guardan los 
programas; también es posible «depo- 
sitar» listas de nombres o números, in- 
cluso el propio sistema tiene almacena- 
das gran cantidad de útiles en ella. 
Todo ello lo estudiaremos en detalle 
más adelante. Por el momento, nos in- 
teresa saber cómo observar el progra- 
ma que tenemos en memoria. Рага 
ello, indicamos al AMSTRAD que nos 
proporcione un LISTado de las instruc- 
ciones que previamente hayamos intro- 
ducido. Una vez tecleado un programa, 
por ejemplo el del capítulo anterior, tc- 
clearemos LIST у pulsaremos <EN- 
TER>. Con ello visualizaremos el con- 
junto de instrucciones tecleadas orde- 


“nadas por su número. 


Si sólo descamos ver parie de esas 
instrucciones, el comando LIST permi- 
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tc seleccionar la parte buscada del lis- 
tado del programa. Basta indicarlo con 
un nümero a continuación. Por ejem- 


plo: 


El primer LIST solicita que se liste 
únicamente la sentencia número 10, el 
segundo listará las sentencias entre la 
10 y la 30 (ambas incluidas), la tercera 
saca un listado hasta la sentencia пй- 
mero 20 y, por último, la cuarta lista to- 
das las sentencias a partir de la núme- 
го 20 hasta el final. La posibilidad de 
efectuar listados de programas permi- 
te, aparte de comprobar qué se ha es- 
crito, repasar los errores de conjunto y 
verificar la corrección de la escritura. 

Supongamos que desea eliminar de 
la memoria el programa tecleado, es 
decir, aquello que NOSOTROS hemos 
ido almacenando, Si tecleamos NEW y 
después pulsamos <ENTER> todo 
cuanto hubiera almacenado en memo- 
ria desaparecerá, Así, en el caso que vi- 
mos no ocurriría absolutamente nada al 
intentar ejecutar el programa. No con- 
viene hacer pruebas con el NEW des- 
pués de haberse pasado un par de ho- 
ras tecleando (los nervios de mucha 
gente no lo resisten). 

Continuemos con la programación. 
Un programa como el siguiente: 


Cada vez que se ejecute escribe el nú- 
mero 23. Pero..., ¿y si deseáramos im- 
primir en cada ocasión un número di- 
ferente? La solución es disponer de una 
especie de caja о recipiente donde de- 
positar el mimero y que el programa 
imprimiera lo que encontrase en la caja 
en las sucesivas ejecuciones. Eso es una 
variable. No es más que un ngar de la 
memoria del ordenador cuyo conteni- 
do no tiene por qué ser siempre el mis- 
mo, sino que varía a lo largo de la eje- 
cución de un programa. Para trabajar 
соп las variables ocurre al igual que con 
los buzones de correos: es necesario 
darles un nombre que permita su iden- 
tificación diferenciándolas de las de- 
más, 

Los nombres de las variablos se for 
man con letras y números, tenierido en 
cuenta que el primer carácter debe ser 
una letra. Suele ser recomendable que 
los nombres de las variables hagan alu- 
sión a su significado real. Por ejemplo, 
si una variable contiene el precio del 
pan, un nombre significativo sería: 
precpan. ' 

No conviene tampoco que los пот- 
bres scan demasiado largos ya que si 
son variables que deben teclearse en 
múltiples ocasiones, la introducción de 
los programas se vuelve farragosa y 
aburrida. 

Escribamos el siguiente programa: 


En él observamos varias cosas. En 
primer lugar aparece una nueva ins- 
trucción: LET. La sentencia que inclu- 
ye LET se denomina sentencia de asig- 
nación. Es usual traducir LET X=7 por 
«haz X igual a 7». Ello equivale a indi- 
car que se almacene en la «caja» con el 
nombre X el número 7. Dicho de ma- 
nera más propia: asigna a la variable Х 
el valor 7. Así, mientras no aparezca 


una nueva asignación para esta varia- 
ble, el ordenador interpreta que el va- 
lor de X es 7. La sentencia 20 asigna а 
) la variable Y el valor 3 * 7 (es decir, 
) 21). La sentencia 30 indica al ordena- 
dor que escriba en la pantalla el valor 
de la yariable Y, que no es lo mismo 
que la letra «y». En las sentencias de 
asignación, la variable que cambia de 
valor aparece situada a la izquierda del 
signo “=”, mientras que a la derecha 
puede aparecer un número, una expre- 
sión a calcular o simplemente otra va- 
riable. 
Es importante no identificar el signo 


el significado del signo matemático 
igual. Así, por ejemplo, las sentencias: 


v 


10 LET X-7 
20 LET X=X+1 
30 PRINT X 


“-” de las sentencias de asignación con ` 


tienen un significado muy claro en ВА- 
SIC: 


v 

10 “haz que X valga 7” 

20 “haz que X valga el valor 
que tenía X más uno" (ha- 
cer que X valga 7 + 1, es 
decir, 8) 

30 “escribe el valor de X” (es- 

cribe el námero 8) 


A 


mientras que matemáticamente la 
ecuación X=X + 1 carece de sentido, 
Así pues, es importante concebir una 
variable como cl nombre asignado a, 
una zona de memoria dondc se alma- 
cena su valor. Por supuesto, esta zona 
de memoria física es única, de forma 
que el ordenador una vez ejecutada la 
instrucción de asignación (por ejemplo 


Х-Х + 1) se almacena el número 8 ol- 
vidando (en realidad escribiendo enci- 
ma) el valor anterior. En la mayor par- 
te de los ordenadores, en concreto en 
el AMSTRAD, no es necesario teclear 
la palabra clave LET en las sentencias 
de asignación. Por ello, a partir de aho- 
ra omitiremos su escritura. 

Resulta interesante observar cómo 
en el último programa sería de gran uti - 
lidad no tener que emplear una senten- 
cia de asignación para conseguir que la 
variable X tenga el valor 7, sino que el 
ordenador nos permitiera, durante la 
ejecución del programa, indicar enál es 
ese valor. 

Esa es la misión de la instrucción IN- 
PUT. Cuando en un programa aparece 
esta instrucción, el ordenador se detie- 
ne esperando que se le comunique el 
valor que debe asignar a bh variabk. 
Así la ejecución del siguiente progra- 
ma: 


v 
10 INPUT X 
20 Y-2*X 
30 PRINT, Y 
40 Y-3*X 
50 PRINT Y 


A 


Sería: 

10 Aparcce en la pantalla un signo, 
normalmente “?” y el cursor. Nosotros 
tecleamos un número y pulsamos la te- 
сіз <ENTER>. Con ello el AMS- 
TRAD asigna a la variable el número 
tecleado. 

20 El ordenador asigna a la variable 
Y el valor de la expresión 2*X, es de- 
cir, cl doble del valor introducido сп la 
sentencia anterior. 

30 Aparece en pantalla el valor de Y. 

40 Se la asigna a Y el valor de 3*X. 
Téngase en cuenta que desaparece el 
valor que contenía Y. 

50 se escribe el nuevo valor de Y. 

Tratemos de escribir ahora un pro- 
grama con un significado claro. Toma- 
remos un ejemplo de la vida cotidiana. 
Vamos a realizar el cálculo de gastos de 
una noche de fiesta, Primero calculare- 
mos el precio de la cena multiplicando 
el precio del menú por el número de 
asistentes y después el coste de la sala 
de fiestas por un procedimiento similar. 

El programa quedaría así: 
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10 INPUT PRECMENU 

20 INPUT NUMASIST 

30 COSTECENA = PREC- 
MENU * NUMASIST 

40 INPUT PRECSALA 

50 COSTESALA = PREC- 
SALA * NUMASIST 


А 


y con ello cl coste total resulta. 


v 


| 60 COSTOTAL = COSTE- 
| CENA + COSTESALA 
| 70 PRINT COSTOTAL 


A 


————— | 

Como se observa, seria de interés po- 
der indicar cuál es el objetivo del pro- 
grama. La ventaja es que una persona 
que no haya escríto este programa po- 
drá identificar su cometido y sus partes 
sin dificultades. La instrucción REM se 
usa con esta función. Una sentencia en- 
cabezada por REM especifica al orde 
nador que no debe interpretar esa sen- 
tencia. Es decir, csa línea figura en el 
programa como un simple comentario. 
Al pasar por ese número de línea la eje- 
cución del programa la ignorará. En 
nuestro ejemplo podríamos haber 
puesto 


v 
5 REM PROGRAMA PARA 
CALCULAR GASTOS DE 
FIESTAS 


55 REM CALCULO DEL 
TOTAL 


A 


AAA 
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Además, el programa ejemplo tiene 
otro defecto importante. Durante su 
ejecución (comprucba el funciona: 
miento) la pantalla no nos ayuda en la 
interpretación de los datos. Si uno eje- 
cuta el programa y ve aparecer el signo 
“2% no sabrá qué debe introducir: el 
precio de la cena о el nümero de co- 
mensales. Para poder utilizar un pro- 
grama así es imprescindible recordar el 
orden en que habían de ser introduci- 
dos los datos. En programas de mayor 
complejidad llega un momento en que 
по es posible acordarse de qué dato 
está solicitando el ordenador La forma 
de evitar tal desorganización es simple. 
Un modo de hacerlo puede ser interca- 
lar (he aquí la ventaja de haber nume- 
rado de 10 en 10) entre cada solicitud 
de entrada de un dato una instrucción 
PRINT que indigue el significado. 

En el ejemplo sería: 


y 


5 PRINT “INTRODUZCA 
EL PRECIO DEL MENU 
POR PERSONA” 

15 PRINT “INTRODUZCA 


EL NUMERO DE ASIS- | 
TENTES” 

35 PRINT “INTRODUZCA 
EL PRECIO DE LA EN- 
TRADA A LA FIESTA” 

65 PRINT “EL COSTE TO- | 
TAL DE LA NOCHE ES | 
DE:” 


А 


El programa que resulta es más fácil 
de comprender por quien lo ejecuta. 
De todas formas, es posible mejorar su 
estructura: 

La instrucción PRINT permite la es- 
critura de textos y variables. También 
permite escribir varios textos y varia- 
bles separando unos de otros mediante 
los signos *," y “3”, Cuando se utiliza 
el punto y сота (;) la signiente escritu- 
ra se realiza justo a continuación del úl- 
timo símbolo escrito. Cuando se escri- 
be un número éste aparece con un es- 
pacio a cada lado. Así el programa: 


v 
100 a=7 
110 b-15 


120 PRINT “numeros” ; 
| ajb;a; “fin” 


А 


resulta (al ejecutarlo con RUN 100): 


v | 
números 7 15 7 fin 


А | 


Las distintas cadenas y variables se 
pueden separar también por el signo 
",". La linea de escritura del ordena- 
dor se divide en el AMSTRAD en tres 
sectores. El empleo de la como (,) in- 
dica que la próxima escritura se reali- 
zará en el siguiente sector. 

Como ejercicio para este mes vamos 
a dejar el repaso de todo lo visto y la 
realización de un programa que, adc- 
más de calcular el coste de esa noche, 
dé una salida en pantalla de este estilo: 


v 
COSTE DEL MENU 
1230 


COSTE DE LA SALA 
1000 


COSTE TOTAL — 6690 PTS 


NUMERO DE ASISTENTES | 
3 


NUMERO DE ASISTENTES 
3 


COSTE DE LA CENA 
3690 


COSTE DE FIESTA 
3000 
A 


Luis Al varez 


AMPLIA LAS POSIBILIDADES 
DE TU AMSTRAD 


PENE ns 
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Todos hemos visto en al- 
guna pelicula máquinas-ro- 
bots-ordenadores pensan- 
tes, capaces de tomar de- 
cisiones inteligentes, o he- 
mos leído su descripción en 
más de una novela de cien- 
cia-ficción. Sabemos inclu- 
so que existen realmente 
ordenadores muy potentes, 
preparados para ayudar en 
diagnósticos médicos, con- 
trol de procesos industria- 
les, navegación, etc., si 
bien sólo al alcance de 
científicos escogidos, que 
nuestra imaginación repre- 
senta enfundados en su ti- 
pica bata blanca. Ahora 
bien, pocos se atreverían a 
imaginar la «inteligencia ar- 
tificial domésstica». 

Sin embargo, en un libro 
verdaderamente атопо, 
Tim Наплей nos demuestra 
que es posible; y no sólo 
eso, sino que además nos 
enseña a que seamos no- 
sotros mismos los que de- 
sarrollemos nuestros pro- 
pios programas «inteligen- 
tes». Toda una aventura 
que llegará a buen término 
si nos dejamos guiar por la 
mano firme y segura de 
esta excelente obra. 

Así, entre otros, se nos 
presentan programas como 
SILOGISMOS, capaz como 
su nombre indica de sequir 
líneas deductivas totalmen- 
te al estilo de los antiguos 
filósofos griegos. О el caso 
de DOCTOR, una versión 
BASIC del famoso ELIZA, 
que probablemente pueda 
ayudarle a resolver esos 
pequeños problemas aní- 
micos о psíquicos. Incluso 
podremos encontrar un 
programa que jugará con 


nosotros de forma incansa- 


ble a un juego semejante a 
las damas. con la peculiari- 
dad de que el ordenador irá 
aprendiendo a medida que 
iranscurran más y más par- 
tidas. Dentro de la línea de 
programas de juego, po- 
dremos también disputar 
grandes partidas de 3 en 
Raya. Además se nos ofra- 
cen programas tales como 
un generador de poemas, o 


ZX Spectrum- Spectrum 4- 
Apple йе, lic- Dragon 32, 64- ЕМ рс-Ойс 


un sistema experto para 
elegir microprocesadores, 
о ип programa que, si- 
guiendo nuestras órdenes, 
mueve objetos en un mun- 
do bidmensiona| e inc uso 
un eficiente traductor in- 
glés/espafiol. 


Posiblemente usted, lec- 
tor, no conozca el tema, O 
tal vez piense que no le in- 
teresa. Pero seguro que al 
leerlo cambiará de opinión, 
ya que la presentación de 
los diversos problemas 
planteados —razonamíen- 
to humano, razonamiento 
simulado, programas de 
juegos inteligentes, siste- 
таз expertos, programas 


que aprenden de sus erro- 
res, programas traductores 
—está muy bien estructura- 
da, analizando los temas 
primeramente desde un 
рип de vista bórico, рага 
pasar a continuación al as- 
tudio fragmentado del 


correspondiente programa- 
ejemplo propuesto por el 
autor. Dichos ejemplos es- 
tán realizados en un BASIC 
estandard, facilmente 
adaptable a la mayoría de 
los ordenadores domésti- 
cos que se encuentran en 
е! mercado. Incluso se ofra- 
ce al final un apéndice con 
los listados adaptados al 
ZX-Spectrum. 


La traducción es exce- 
lente, muy por encima de lo 
que es habitual en los libros 
sobre ordenadores domés- 
ticos, y los programas son 
igualmente buenos, si bien 
el autor no cesa de invitar- 
nos a que investiguemos la 
forma de mejorarlos e in- 
cluso a que desarrollemos 
nuestros propios progra- 
mas. Para ese fin incluye 
un apéndice con consejos 
muy útiles sobre el método. 
a seguir en el desarrollo de 
ип programa, 


Otro punto a destacar es 
la constante información bi- 
bliográfica, de la cual en- | 
contramos una recopilación 
en otro apéndice. Sin duda 
un elemento interesante 
para aquellos que deseen 
seguir investigando y pro- 
fundizando en este tema. 
Hemos de descubrirnos 
ante el notable esfuerzo 
realizado por el autor para 
documentarse adecuada- 
mente y poder incluso ofre- 
cer а los lectores opiniones 
contrastadas en temas tan 
conflictivos como la frunte- 
ra entre razonamiento e in- 
leligencia, o el problema де. 
hasta dónde se debe per- 
тіїг llegar a 65 máquinas 
en cuestiones de Int 
cia, 
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Libro: Ordeno y Aprendo con AMSTRAD para EGB 
Autor: J. L. Carralero 


= 


Editorial: INED, S. A. 
Páginas: 193 


«Ordeno y Aprendo» 
es algo más que un cur- 
so de iniciación al BASIC. 
Se trata de un libro capaz 
de enseñar a cualquiera 
el camino exacto para 
realizar un programa con 
éxito, incluso a los más 
pequeños. La estrategia 
pedagogica es excelente, 
y sigue un modelo de 
aprendizaje configurado 
en dos apartados. 

En primer lugar, ee 
aborda el conocimiento 
necesario para la asimila- 


ción de los conceptos bá- 1 
sicos y su aplicación en minio y manejo del orde- 


las técnicas de trabajo, nador mediante la utiliza- 
para continuar con el área ción del lenguaje BASIC 
práctica, enfocada al glo- de programación. Al final 


Ordeno y 
Aprendo 


de cada capítulo se inclu- mente su estructura inter- 
ye una serie de preguntas na. Simultáneamente se 
para reafirmar los conoci- empieza con los coman- 
mientos adquiridos. dos BASIC, 
El libi tá 4 Ahora пов encontra- 
| ү, оза! graciosas mos con los sistemas de 
mente ilustrado con tortu- numeración, cambios de 
gas semejantes a las del base, las variables, las 
LOGO, que se encargan constantes, el tratamiento 
do representar en imágo- деа Окап Шун 
nes lo que el texto nos ex- bién, cómo no, los organi- 
plica con palabras. gramas, las bifurcaciones 
Al principio del libro se y las variables de control, 


Por último, se analiza el 
nos ofrece un resumen de ЕТ 


la historia dela informáti- trucciones FOR... NEXT, 
са, дё сото Una pinara las instrucciones READ y 
aproximación al ordena- DATA, el comando EDIT, 
dor, el hardware y el soft- y los poderosos AUTO y 
ware. A continuación se RENUM. Y como colofón, 
analiza el ordenador más se explica la utilización 
en profundidad, especial- dimensionad: 


Libro: «Código máquina para principiantes con AMSTRAD 
Autor: Steve Kramer 


Editorial: Indescomp 
Páginas: 175 


Este libro va dirigido al tador de Programa (regis- 
principiante que desea tro PC), y su manejo por 
aprender a programar en medio de las instruccio- 
código máquina en el nes CALL y JP. También 
AMSTRAD СРС464. En se explica en esta Sec- 
primer lugar se apuntan ción el manejo del 
unas breves nociones STACK realizado por las 
кынев sobre nume- instrucciones CALL. 
ración binaria y hexadeci- Abordamos después 
mal, іе códigos ASCII y аз Instrucciones animet- 
una primera aproxima- cas del 280, tales como 
Е Шер ensam: . - IND, DEC. SUB, SBG; 

S DM r ADD, ADC, así como la 

A continuación se expli- explicación de conceptos 
ca lo que es un diagrama сото el de acarreo. In- 
de flujo y los simbolos mediatamente después 
más utilizados. se explica el registro de 

A partir de este mo- indicadores (flags) y su 
mento nos introducimos relación con las instruc- 
en el mundo fascinante ciones anteriores y con 
del Z80. Empezamos con Otras como CP y 105 sal- 
los registros y las instruc- los condicionales, tanto 
ciones que permiten mo- relativos como absolutos, 
ver información de un ге- Se incluyen también aquí 
gistro a otro. Se analiza las instrucciones CCF y 
cada instrucción y, en los Scr. 
casos en que es posible, Continuamos con las 
se muestra el paralelismo ^ operaciones lógicas 
existente con el lenguaje (AND, OR, XOR, CPL y 
BASIC. NEG), y con un análisis 

Pasamos ahora al Con- más detallado de la utili 


flags y su aplicación para 


operaciones en matemá- 
proa tica binaria. 
Por último, las instruc- 

X ciones de carga LDD, 

LDDR, CPD, CPDR, LDI, 
| LDIR, CPI, CPIR, y las 
instrucciones de entrada 
y salida IN y OUT. 

Un último apartado se 
refiere a las instrucciones 
menos frecuentes, como 
las de interrupciones y 
entrada-salida de cade- 
na. Habla tambión en 
este apartado de los res- 
tarts y los modos de di- 
recciónamiento. 

El final del libro está 
constituido por una breve 


— - steve Kramer | 


zación del STACK me- 
diante las instrucciones referencia al modo de ші- 


EASY BE. lizar las rutinas del Siste- 
Llegados a este punto ma Operativo (tal vez de- 
nos sumergimos de cabe- masiado breve) y una se- 
za en el nutrido grupo de rie de apéndices (tablas 
instrucciones de rotación: de instrucciones del 280, 
RL, RLA, RLC, RLCA, conversión hexadecimal- 
RLD. SLA. RR, RRA, decimal, mapa de panta- 
ВАС, ARCA, RRD, SRA, lla del AMSTRAD y direo- 
SRL. Nos habla también ciones de algunas rutinas 
de sus ofectos en los dol Sistema Operativo 
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(6 el siguiente 
г: 


El listado de la línea 470 ез el 
siguiente: 

470 |RSCR1,5,6,11,12,9,10,9,10: 
LSCR1,7,8: |RSCR2,15,16,17,18: 
LSCR2,21,22,19,20,19,20. 

El mencionado error viene a 
decir que el BASIC no encuentra 
ип comando externo que corres- 
ponde a lo escrito trás el símbo- 
lo 4 (según la definición del li- 
bro del usuario). 

Les advierto que el juego sale 
normalmente (todo funciona 
correctamente) hasta que pulso 
la tecla [J] (para Jugar). Enton- 
ces aparecen los dibujos gene- 
rales en la pantalla e, inmediata- 
mente después, el mencionado 
error que interrumpe la ejecu- 
ción. También deseo advertirles 
que poseo un СРС-664 y el рго- 
blema puede venir dado por la 
incompatibilidad del programa. 

Así pues, me gustaría que me 
dieran una solución precisa al 
problema pues me gustaría te- 
ner el emocionante juego a mi 
alcance. 

Quisiera también que intenta- 
ran solucionar lo que creo que 
es un fallo del ordenador. Este 
problema viene dado por la apa- 
rición del mensaje SINTAX 
ERROR ІМ (línea х) cada vez que 
el ordenador encuentra en la lí- 
nea x la orden DEFINIT a-z. 
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Cuando ocurre esto cambio la 
orden DEFINIT por la de DE- 
FREAL con lo cual el programa 
sigue su curso aunque querría 
saber si esto perjudica o no su 
ejecución. 

Con las gracias anticipadas se 
despide un lector y seguidor de 
su revista que les felicita por su 
trabajo. 


Muy cordialmente, 
Pere Juanola González 
Roses (Gerona) 


En lo referente al programa “la 
гапа’, el problema es el siguiente: 

Los comandos RSX (0 lo que es 
lo mismo, los comandos precedi- 
dos por el símbolo “ no son ni más 
пі menos que rutinas en código 
máquina, a las que se da un nom- 
bre mediante una tabla de nom- 
bres y, utilizando una rutina del sis- 
tema operativo, se informa al ВА- 
SIC de que dichos comandos y di- 
cha tabla de nombres, se produce 
el citado mensaje de error, ya que 
no encuentra el nombre que bus- 
ca. 
Efectivamente, según el texto de 
su carta, la línea 470 está bien es- 
ста, por lo que el fallo habrá que 
buscarlo en la tabla de nombres. 
¿Y dónde está esta famosa tabla? 

Bien, апайсето5 la situación. 
Tanto las rutinas en máquina (que 
constituyen los comandos RSX) 
como la tabla de saltos y la llama- 
da a la rutina del sistema operati- 
vo para inicializar dicha tabla se 
encuentran en los DATAS del pro- 
grama en BASIC. Así, probable- 
mente el error se encuentre en al- 
guno de estos datos, y más con- 
cretamente en los referentes a la 
tabla de saltos, Por tanto, sólo ros- 
ta aconsejarle que revise cuidado- 
samente el contenido de las líneas 
3260 a 3290, ambas incluidas, ya 
que probablemente esté ahí el fa- 
По. 

En cuanto a su segunda pregun- 


е pueden ha- 

, tiempo infi- 

objetos, etc.) de- 

los lo enviasen 

sen en la sección de 

correo con más claridad. 


Alberto y Antonio 
Valencia 


En la página 30 del nümero 3 de 
nuestra revista aparecen dos lista- 
dos en BASIC. El primero de ellos 
permite, siguiendo las inetruccio- 
nes del texto del artículo, cambiar 
el nümero de objetos necesarios 
para completar el juego, el núme- 
ro de vidas y el tiempo disponible. 
El segundo permite cambiar los 
objetos que aparecen en la habita- 
ción cero y, leyendo atentamente 
el texto, verán que no es difícil mo- 
dificarlo para cambiar otra habi- 
tación. 


Si su pregunta se refiere a si po- 
demos publicar el Knight Lore 
mismo, no es posible, ya que se 
trata de un juego comercial, prote- 
gido por derechos de autor y co- 
mercializado en España. El juego 
en sí debe ser comprado en algu- 
na tienda especializada. Si pudié- 
ramos lo publicariamos, pero a la 
gente de Ultimate no le iba a sen- 
tar muy bien. Lo que pretende el 
articulo es facilitar el recorrido del 
Juego y hacer que llegar al final sea 
accesible a los mortales. 
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Lo que hay que saber... 


* ¿Qué capacidad 
máxima tiene el pro- 
grama AMSFILE? 


— En el folleto de intrucciones se 
explican los máximos datos que 
puede manejar dicho programa. 
Los datos correctos son: 

9.999 fichas en total en un fi- 
chero. 

60 caracteres como máximo en 
un campo. 

20 campos en una ficha. 

1:200 caracteres en total en una 
ficha. 


Esto signilica que las máximas ca- 
pacidades que el programa puede usar 
internamente son ésas. Pero no quie- 
re decir que se puedan usar todas las 
capacidades a la vez, debido a las li- 
mitaciones de los medios de almace- 
namiento (léase discos). Es docir, se- 
gún lo anterior, la longitud maxima que 
podría tener un fichero manejado por 
AMSFILE sería: 

9.999 fichas х 1.200 caracte- 
res — 11.996.800 nümero total de ca- 
racteres. 

O lo que es lo mismo 11.717Ks, o al- 
rededor de 11 Megabytes. Como se 
puede ver estas capacidades desbor- 
dan por completo la capacidad que po- 
seen actualmente los Ametrad de la 
familia CPC, e incluso, la del nuevo 
РСҮү8256. Para manejar esa cantidad 
de datos se necesitaria un disco duro, 
lo que, según nuestras noticias, toda- 
ма no está disponible para los ordena- 
dores Amstrad. 

Para hallar la longitud máxima que 
puede tener un fichero concreto se si- 
gue el método siguiente: Dividir la ca- 
pacidad libre que tenemos en un disco 
entre el número de caracteres de la fi- 
cha que hemos definido. El resultado 
€s el número máximo de fichas, 

La capacidad libre son 169К5 con 
formato sistema (que exige Amsfile). 
Además de esto hay que tener en 
cuenta si se trabaja con dos unidades 
de disco o con una, ya que si se da 
esta última condición, hay que descon- 
tar lo que ocupan los programas de 
Amsfile (en conjunto, 43Ks), ya que es- 
tos deben ser siempre accesibles (con 
dos unidades se puede dejar una uni- 
dad entera para el fichero —el drive 
B— y tener el programa еп la otra). А 
ambas capacidades hay que descon- 
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tar un máximo de 3Ks, que ocupan los 
ficheros auxiliares de definiciones y de 
número de datos. Resumiendo, con 
dos unidades tenemos libres 166Ко 
(169-3) y con una, 123Ks (169-43-3). 
P.e. El máximo número de fichas 
que se puede manejar con una ficha 
de 100 caracteres es la siguiente: 
na unidad: 
123*1024/100 = 1259 fichas. 
— Dos unidades: 
166°1024/100 = 1700 fichas. 


* ¿Qué tengo que hacer 


para tener una copia de 


Amsfile en disco? 


Para obtener una copia de AMSFI- 
LE en disco, el proceso más rápido es 
éste: 

1. Hacer una сора del disco-rega- 
lo con ayuda de los comandos “СОРҮ- 
DISC' (si dispone de 2 unidades de 
disco) o 'DISCCOPY (si sólo dispone 
de una), para el 664 o el comando 
'DISCKIT3' para el 6128. 

Para ello, introduzca el disco de 
СРАМ cn la unidad A; 1ссісе СРМ у 
pulse ENTER. 

Una vez que aparezca la divisa de 
CP/M, А>, teclee COPYDISC, DISC- 
COPY о DISCKIT3 (según sea el nú- 
mero de unidades y la versión de 
CP/M) y proceda como le indica la 
pantalla. 

2. Una vez terminado este proce- 
so, dispóngase a borrar todos los pro- 
gramas que no le son necesarios: para 
verlos teciee DIR, habiendo introduci- 
do previamente la copia realizada en 
la unidad A. 

De los programas que aparecen en 
pantalla, debe borrar todos EXCEPTO: 
BRUN.COM, AMSFILE.COM, AMSFI- 
LE2.COM, RGOAD.COM 

Para borrar, teclee: ERA nombre- 
de-programa.extensión. 

Por ejemplo, ERA EAMS- 
WORD,BAS [ENTER] 

о ЕВА“, BIN [ENTER] 

El otro método os hacer una copia 
de sólo los ficheros terminados en la 
extensión .COM, haciendo uso del pro- 
grama FILECOPY o FIF, según la ver- 
sión de СР/М. 

Una vez hecho esto, hay que ejecu- 
tar los programas SYSGEN y BOOT- 
GEN de CP/M 2.2, en los que será el 
disco fuente (source) el original de re- 


c—————  M——Q—á—— | 


galo y el destino (destination) la copia 
realizada. La finalidad de estos progra- 
mas es copiar el sistema operativo en 
las dos primeras pistas y generar cl 
programa de arranque. 


* ¿Qué significa la pre- 
gunta, en la opción 'Sa- 
lidas por Impresora', 
INTRODUZCA CODI- 
IMPRE- 


GOS DE 
SION...? 


Esto se refiere a los códigos de con- 
trol de la impresora que se envían para 
que ésta tome determinadas acciones, 
generalmente se utilizan para poder 
escribir en distintos tipos de letra. Por 
ejemplo, para listados de anchura зи- 
perior a 80 caracteres, quizá se desee 
mandar el código correspondiente a 
escritura comprimida, que permite es- 
cribir hasta 132 caracteres (general- 
mente el 15). O listados en letra de alta 
calidad (normalmente 27, 120, 1), etc. 
Para mayor información, consulte el 
manual de su impresora. 

Si no se desea ningún tipo de letra 
especial, simplemente pulse ENTER, y 
volverá al menú 'Salidas por Impreso- 
га'. Si desea mandar algún código de 
contro! a la impresora, debe compro- 
bar la secuencia correcta en su impre- 
sora, teniendo en cuenta que éstos 
pueden ser de uno a tres caracteres y 
que la última vez debe pulsar ENTER, 
sin haber tecleado nada. Veamos 005 
ejemplos. 

Supongamos que desea mandar el 
código de comprimido, y que éste 
corresponde en su impresora al 15 
(decimal). Teclearía: 

15 [ENTER] [ENTER] 

Si deseara mandar los códigos de 
alta calidad, suponiendo que su impre- 
sora tuviera esa posibilidad y que 
correspondieran A ESC x + 1, lo que 
debería teclear sería 27 (código que 
corresponde a ESO), 120 (código de la 
*x'), seguido de 1. Es decir: 

27 [ENTER] 120 [ENTER] 1 [EN- 
TER] [ENTER] 

Observe que para salir siempre se 
pulsa ENTER sin haber tecleado nin- 
gún carácter, lo que le indica al progra- 
ma que queremos abandonar la op- 
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RPA Systems Inc. te ofrece una amplla gama de programas, hasta 34, 

para que tu gestión sea más rápida y eficaz. 

Programas muy fáciles de usar, con ип lenguaje compilado de alto 
° nivel y continuas ayudas en pantalla. 

Рог eso, si eres pequeño empresario, comerciante о profesional 

liberal, ahora lo tienes "todavia más fácil”. 

De venta en los principales almacenes y en tiendas especializadas. 

Pídenos información sin compromiso, tu primera sorpresa será su 

precio. 
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